


DES BASICS PLUS POISSANTS 
Basicode, Superbasic, Basic étendu 


• Spectrum +s où est le plus? 

• Les mystères des nombres 

• Codes secrets 


Répertoire des articles parus 
dans les 10 premiers numéros 
Et toujours plein de programmes 


H! - 2 e trimestre 1985 


Canada 6.45 $ - Belgique 220 FB - Suisse 8 FS 28 FF 





























































Le petit ordinateur illustré: 

votre magazine 
radio. 



Ajaccio 

R. Corse Int. 

95.8 MHz 

JEU 

20 h 30 

Albi 

RTN 

93,4 MHz 

LUN 

19h 30 

Alençon 

AFM 

89.4 MHz 

MER 

19h 

Aies 

Filasoi 

88.6 MHz 

JEU 

19 h 

Amiens 

RCC 

101 MHz 

SAM 

11 h 




et MER 

15h 

Angers 

Angers 101 

101 MHz 

MER 

19 h 15 

Angoulême 

R. Marguerite 

99.9 MHz 

JEU 

19h 

Annecy 

Sud Est Radio 

102 MHz 

SAM 

9 h 30 

Bastia 

R. Corse Int. 

91.4 MHz 

JEU 

20 h 30 

Bayonne 

R. Adour Navarre 

90.7 MHz 

JEU 

18h 

Belfort 

Radio Soleil 

88.1 MHz 

SAM 

12h05 

Besançon 

RVF 

98.1 MHz 

SAM 

9 h 30 

Bordeaux 

Radio 100 

94.3 MHz 

DIM 

10 h 15 

Boulogne/mer 

RBL 

91.6 MHz 

MER 

12h 

Bourges 

Recto-Verso 

98 MHz 

SAM 

10 h 30 

Brest 

Radiogram 

103 MHz 

SAM 

14h 

Briançon 

RBV 

94 MHz 

VEN 

18h 

Brive 

R. Brive Licorne 

95 MHz 

MAR 

18 h 30 

Caen 

Caen FM 

96.8 MHz 

DIM 

lOh 

Cahors 

Chabrot 

96.2 MHz 

SAM 

13h 

Cannes 

Fréquence Sud 

97.7 MHz 

SAM 

19h 

Carcassonne 

Radio 11 

94.1MHz 

MER 

8h45 

Castres 

R. Tarn Sud 

97.5 MHz 

SAM 

lOh 

Chalons 

Radio Chalons 

98 MHz 

MER 

19 h 15 

Chambéry 

Fréquence Horizon 

100.2 MHz 

JEU 

19h30 

Chartres 

Radio Loisirs n 1 

97.3 MHz 

SAM 

lOh 

Chateauroux 

Radio Reflex 

99.7 MHz 

SAM 

13h45 

Cherbourg 

Radio Rustine 

87.8 MHz 

VEN 

19h 

Clermont-Ferrand 

Station MU 

96.2 MHz 

DIM 

11 h 

Colmar 

Radio 100 

100.2 MHz 

MAR 

19 h 30 


15 minutes toutes les 
semaines, sur 
80 stations FM. 


Creil 

FDL 

100.3 MHz 

MER 

19h 15 

Dax 

ACQS 95 

95.1MHz 

MER 

19h 

Dijon 

Radio 2000 

90.7 MHz 

VEN 

19h30 

Evreux 

REV 

89.1 MHz 

VEN 

19hl5 

Fréjus 

REM 

97.8 MHz 

SAM 

13h30 

Gap 

RTM 

90 MHz 

MAR 

13h 

Grenoble 

RVI 

96 MHz 

SAM 

18h45 

Guéret 

REM 

100.1 MHz 

SAM 

llh 

Haute-Loire 

RCL 

100.8 MHz 

LUN 

18h45 

La Rochelle 

R. La Rochelle 

92 MHz 

LUN 

18h45 

Lannion 

Pays de Trégor 

91.6 MHz 

SAM 

19 h 30 

Laval 

Perrine 

101.3 MHz 

MAR 

19 h 30 

Le Havre 

EVA 

103.4 MHz 

JEU 

20 h 45 

Le Mans 

FM 104 

104 MHz 

JEU 

18h 

Lille 

Contact 

93.4 MHz 

JEU 

22 h 

Limoges 

HPS 

102.7 MHz 

DIM 

9h45 

Lons-le-Saulnier 

Lacuzon 

89 MHz 

MER 

17h30 

Lorient 

AVB 

102.7 MHz 

MER 

13h 15 

Lyon 

Ciel FM 

96.9 MHz 

DIM 

lOh 

Mâcon 

Radio Pélican 

88 MHz 

MAR 

12h30 

Marseille 

Fréqu. Marseille 

94.7 MHz 

DIM 

10h30 

Metz 

RGM 

8/766 5721 



Mont-de-Marsan 

Radio 6 

97.9 MHz 

SAM 

9h45 

Montélimar 

R. Côtes du Rhône 

104 MHz 

MER 

16h45 

Montluçon 

Caroline 

96.2 MHz 

SAM 

12h 

Montpellier 

88.8 

88.8 MHz 

JEU 

19h 

Mulhouse 

Bollwerk 

88.1 MHz 

MAR 

21 h 30 

Nancy 

Roekin’Chair 

95.8 MHz 

SAM 

12h 

Nantes 

Atlantic FM 

96.8 MHz 

MER 

19 h 15 

Narbonne 

Radio Corail 

93.6 MHz 

SAM 

9h30 

Orléans 

96.4 

96.4 MHz 

SAM 

llh30 

Paris 

Gilda 

103.5 MHz 

DIM 

lOh 

Pau 

Fréquence 4 

93.1 MHz 

SAM 

18 h 30 

Périgueux 

Fréquence 101 

101 MHz 


53.32.22 

Perpignan 

Stéréo 66 

93.5 MHz 

DIM 

9h 

Poitiers 

RPOFORUM 

90 MHz 

MER 

18h45 

Reims 

88.6 

88.6 MHz 

VEN 

22h 

Rennes 

RBS 

89.1 MHz 

VEN 

10 h 30 

Saint-Etienne 

Transat 

93.4 MHz 

MER 

19h 

Saintes 

Saintes 102 

102 MHz 

MER 

19 h 

Saint-Gaudens 

R. Comminges 

92.9 MHz 

MER 

13h30 

Saint-Lo 

R. Manche 

102.5 MHz 

MER 

18h30 

Saint-Malo 

Force 7 

95.9 MHz 

MAR 

22 h 

St-Quentin 

Azur 100 

100.2 MHz 

SAM 

9h 

Salon de Prov. 

R. Centuries 

99.7 MHz 

LUN 

18 h 30 

Seine et Marne 

RBS 

103.7 MHz 

SAM 

13h 

Sens 

R. Horizons 

91.2 MHz 

MER 

19 h 30 

Strasbourg 

Nuée Bleue 

89.5 MHz 

JEU 

18 h 30 

Tarbes 

Pirène 98 

98 MHz 

SAM 

8h45 

Toulon 

Mistral 

104 MHz 

SAM 

10 

Toulouse 

Cambos 

93.5 MHz 

JEU 

19hl5 

Tours 

Méga Tours 

103 MHz 

JEU 

12h45 

Troyes 

Discone Radio 

92 MHz 

JEU 

18h45 

Valence 

Valence FM 

91 MHz 

MER 

19h30 

Vezoul 

RVS 

91.3 MHz 

MAR 

19h45 


Annonceurs, faites connaître votre produit 
ou vos services aux auditeurs de P.O.I. 
Contactez FORCE 7 au (1) ZW.ZZ.0l. 




petit 

ordinateur 

illustré 


Une émission proposée par la revue L’Ordinateur Individuel et Gilda Presse. 








Extrait du courrier : 

« Disposant d’un Spectrum, je constate que la 
grande majorité des programmes que vous pu¬ 
bliez sont pour le ZX81 » (Marcel Chevaux) 


« J’ai acheté ORDI-5 depuis le début : c’était 
une chouette revue pour mon ZX 81 ; mais de¬ 
puis quelques temps, il n’y en a plus que pour le 
Spectrum » (François Augé) 


« Vous parlez bien de temps en temps du QL, 
mais on a pas encore vu de programme pour lui 
dans votre revue » (Claude Douée) 


« Il y a quelques numéros, vous avez fait une pe¬ 
tite place au Jupiter Ace, mais depuis ce temps- 
la, les amateurs de FORTH restent sur leur 
faim » (Jean Machelon) 


Ce pourrait être le moment de s’abriter derrière 
La Fontaine «.Nul ne peut contenter tout le 
monde et son père » mais nous nous abriterons 
derrière les statistiques : le nombre des pro¬ 
grammes consacrés à chacun de ces différents 
appareils est exactement proportionnel au nom¬ 
bre d’exemplaires de cet appareil dans le parc 
ordinateur francophone ! 


Pour vous faciliter ce pointage - et vous rendre 
naturellement d’autres services - vous trouverez 
dans ce numéro un récapitulatif complet des ar¬ 
ticles et programmes publiés dans les dix pre¬ 
miers numéros : vous verrez qu'aucun modèle 
de la grande famille Sinclair n’a été vraiment 
avantagé ou lésé. Seul le ZX 80, le grand ancê¬ 
tre, est absent, mais il a droit à notre affec¬ 
tueuse nostalgie. 


Si le Quantum Leap n’est pas représenté, c’est 
que son apparition sur le marché français est 
toute récente : ce numéro est donc le premier à 
proposer des programmes pour cette remarqua¬ 
ble machine. C’est encore une étape et ORDI-5 
est très heureux d’avoir conduit ses lecteurs 
jursque là. 


ORDI-5 


Editorial . 

Courrier des lecteurs .. 

Magazine .. 

Trucsàbrac . 

Un tas de PRINT avec TASPRINT 

Les meilleures cassettes . 

5 livres .. 

Sommaire des 10 numéros d’ORDI-5 

Top, spectrum secret_ 

Ecran, mon bel écran .... 

LesPLUSS .. 

Numérologie sur ZX/81 .. 

Le Wafadrive de Rotronics 
5 programmes de jeu _ 


.. .3 
...8 
.. 12 
..13 
..15 
..16 
..18 
. .21 
..23 
. .26 
. .27 
. .37 
. .40 
. .42 


Rédacteur en chef: Alain Plnaud. 

Editeur : Jean-Pierre Nlzard. 

Directeur de la publication : Bernard Savonet: “ - 
Conseiller technique ; Xavier Llnant de Bellefonds. 

Maquette : Sylvlne Dautref 

Illustrations : Christian Augé, Pierre Prlgent, Nicolas Spenga. 
Couverture : Isabelle Mounler. 


Ont collaboré à ce numéro : Kaarlna Alain, Tristan d'Amlco, 
François J. Bayard, C. Blatter, F. Bossert, Jean-Claude Bouman, 
M. Chanaud, Bertrand Clergeot, M. Decombe, F. Delaqualze, Pa¬ 
trick Quelle, Marcel Henrot, J.P. Legros, A. Loubeyre, Philippe 
Moy, Claude Nowabrowskl, G. Pedroll, P. Perdan,, C. Remy, 
P. Robert. 


Rédaction et abonnement : Edltrace, 8, rue Saint-Marc, 
75002 Paris. 

Régie publicitaire : Force 7. 5, place du Colonel-Fabien, 75491 
Paris Cedex 10. Tél. : (1 ) 240.22.01. 
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DISPONIBLE ! 


de 175 K à 1,44 MEGA OCTETS 

TEMPS DE CHARGEMENT ULTRA RAPIDE 
CAPACITE DE STOCKAGE PRATIQUEMENT ILLIMITEE 

ENSEMBLE DISC DRIVE + INTERFACE SPECTRADOS + MANUEL ET DISQUETTE UTILITAIRE 


3 pouces 



• •••"'•' •• ' s’.-j- -v-- ; 

L 

Opi . 




■'%; , ‘’. v ? ■ - 


5,25 

pouces 


3402 - 40 pistes - double face - 350 K 
formatés - réf. hd 14 : 4480 F 

Disponible en deux standards, 5 1/4 de pou¬ 
ces au 3 pouces, voici enfin un réel ensemble 
professionnel d’un prix abordable tant attendu 
par tous les possesseurs de Spectrum. Se rac¬ 
corde sur le bus arrière de l’ordinateur par 
l’intermédiaire de l’Interface SPECTRADOS 
fournie avec le Disc Drive (simple et double 
densité). 


INTERFACE SPECTRADOS 
ROM interne - Utilise les mots-clefs de la ZX1 : 
FORMAT, CAT, CLOSE, OPEN, ERASE, etc. - 
Interface parallèle CENTRONICS inclue (impri¬ 
mante) - Raccordement jusqu’à 2 Disc Drives 
(1,44 Mega octets de stockage avec deux 
5802).Bus d’extension pour vos autres acces¬ 
soires. Utilise l'emplacement mémoire de la 
ZX1 - Compatible avec tous les accessoires 
existants (stylo lumineux, poignées de jeux, 
etc.) sauf avec la ZX 1 - Compatible avec tous 


5401 - 40 pistes - simple face -175 K forma¬ 
tée. réf. hd 11 :3270F 

5402 - 40 pistes - double face -350 K forma¬ 
tée - réf. hd 12 :3780 F 

5802 - 80 pistes - double face -720 K forma¬ 
tée - réf. hd 13 :4350 F 
les programmes réalisés pour le Microdrive - 
Alimentation par le Spectrum. Consomme 
moins qu’un ensemble ZX1/Microdrives. 
Livrée avec un manuel d’utilisation et un dis¬ 
que utilitaire qui vous permettra de transférer 
vos programmes de cassettes sur disquette et 
de la formater- GARANTIE 1 AN - Délai de livrai¬ 
son : 3 semaines. 


5” 1/4-simple face - double densité - rél. hu 14 - 
250 F les 10 

CREDIT 

DRIVES SUPPLEMENTAIRES 

5" 1/4- double lace - double densité - rél. hu 15 - 

4 à 21 mois 

5401 -réf. hd 20: 1980F 

300 F les 10 

sur tous les produits 

5402 - réf. hd 21 :2480 F 

3” - double face - double densité - réf. hu 16- 

+ de 1 000 F d'achats 

5802-réf. hd 22:3050F 

690 F les 10 


3402 - réf. hd 23 :3180 F 


Sans achat supplémentaires PRETES A SERVIR 
Imprimantes papier normal SEIKOSHA 
Livrées avec 1 logiciel de traitement de texte* + câbles 
+ 100feuilles de listing. 


JOYSTICK 

INFRAROUGE_ 

Le joyslick conventionnel est mort ! 
Une autre conception des poignées de 
jeux. Transmission par infrarouge. 
Touch controi, pas de pièces mécani¬ 
ques en mouvements : fiabilité 
accrue,- durée de vie illimitée. Compa¬ 
tible avec tous les jeux existants 
(Standard KEMSTON). Livré avec 
l’Interface de réception à brancher sur 
le connecteur arrière du Spectrum. 
Compatible avec tous les accessoires 
existants gràceà son bus d’extension. 
Spectrum 16/48 K - réf. hg 04 -395 F 


Garantie Constructeur 


BON DE COMMANDE A ENVOYER A LOGISOFT 
Vente par correspondance, en magasin, par téléphone. 

B.P. 2392 - 31086 TOULOUSE CEDEX Tél. (61 ) 21.49.55 


VOTRE MICRO EN TOUTES LETTRES. 

CATALOGUE LOGICIELS ET ACCESSOIRES 20 F 
Règlement remboursé à la première commande : 

□ chèque bancaire Participation aux | GRATUIT 

frais d'envoi 


□ chèque bancaire 
O CCP 

□ contre 
remboursement 


Q Crédit : dossier 
par retour du 
courrier 


|\i om . Plus de 200 F 

d'achats GRATUIT 
Prénom : Port recom mandé 

Code postal : .... Ville : .... PRIX TOTAL 


TABLE 

TRAÇANTE 

DIGITALE 


EXTERIEUR: 






Deux modes de Transmission : 1200/1200 ou 1200/75 bauds. 
Totalemenl portable grâce àsa batterie Incorporée. L'écartemenl 
réglable entre le micro et l'écouteur permet d'ullllser la plupart 
des combinés téléphoniques. Standard 23 - RS 232. 

Livré avec le logiciel de communication et l'Interrace à raccorder 
sur le bus arriére du Spectrum. Complablle avec l’Interface RS 
232. Pour Spèclrum, Atmos, CM B 64. 

Spectrum 48 K - réf. hd 38 -1 200 F 


Accédez au graphisme profes- 
sionnel. Réalisez des 
SCREENS uniques. La table 
traçante digitale vous permet 
de reproduire en couleurs et 
haute résolution tous les des¬ 
sins, toutes les photos aux 
dimensions A4 (21 x 29,7cm) 
maximum, et bien sur de réali¬ 
ser vos propres créations pour 
les sauvegarder sur support 
magnétique ou sur l'impri¬ 
mante. Facile d'emploi mais 
très complète et performante. 
Livrée avec un logiciel d'initia¬ 
lisation, l'Interface à raccorder 
sur le bus arrière du Spectrum 
et le bras articulé de reproduc¬ 
tion. Compatible Microdrive. 
Spectrum 16/48 K - réf. hd 43 - 
895 F 
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MICRODRIVE_ 

Le MICRODRIVE dont le rapport 
quaiité/prixest meilleurqu'un lecteur 
de disq uette. Vous offre 85 K octets dè 
capacité. 8 MICRODRIVES connecta¬ 
bles ensemble donnant 680 K. Vitesse 
de transfert : 16 K par seconde. Sortie 
RS 232. Communication entre spec- 
trum. 

Le Pack Microdrive avec 4 logiciels. 
Traitement de texte. Gestion fichier. 
Création jeux, Ant Atlack. Réf. hd 28 - 
1 650 F. 

ZX Microdrivo - réf hu 11 -870 F 
Interface ZX1 - réf hu 12 - 830 F 
Microdisquettes - réf hu 13 - 80 F par 4 
-316 F 



MEMOIRES ZX 81 
SPECTRUM 



16K ZX81 



CREDIT 
4 A 21 MOIS 



MASTER YOUR 
MICRODRIVE _ 


Un Plus pour le Microdrive. Ce .livre 
nous donne 56 routines et program¬ 
mes utilitaires en Basic ou'Langage 
Machine qui vous permettront d'aug¬ 
menter les possibilités et la facilité 
d’utilisation de l'Interface ZX1 et du 
Microdrive. Directement exploitable 
sans connaissance particulière du lan¬ 
gage machine ce « Toolkit », plus pra¬ 
tique que théorique, double la puis¬ 
sance utilisatrice de vos appareils. 
Spectrum - réf. hb 15 - 110 F - 
135 pages. _ 


64K ZX81 

694 F 


SPECTRUM 32K 

535 F 


SPECTRUM PLUS PAL - réf. hu C 
1 660 F 

SPECTRUM 48 K PAL -réf. hd 06 
1560F _ 

SPECTRUM 48 K PERITEL- réf. 
hd 07 - avec 10 logiciels 2 260 F 

SPECTRUM PLUS : réf. hd 09-10 lo¬ 
giciels' 2460 F 

Mêmes caractéristiques que Spec¬ 
trum 48 K. Clavier QL - 17 touches 
supplémentaires facilitant l’accès di¬ 
rect aux fonctions. Boutons Reset. Li¬ 
vré avec cordons pour lecteur de cas¬ 
settes, câble Péritel, alim., notice en 
français, 1 programme de démonstra¬ 
tion. 


UL . réf. hd 10-5 560 F 
128 K RAM extensible à 640 K 

• 32 bits. 

• 2 microdrives, 2 sorties RS 
232 

• 2 sorties joystick. 

• Extension RAM. 

• Livré avec : 

• 4 logiciels, 1 cordon Péritel, 
1 notice en français. 

- F. réf. hd 09_ 


□□□oocaa 
□ □.□□□□□□ 
OOOODDDÜ 

SPECTRUM 
QL 
ZX 81 

DRAGON 32 

■ c.citè; lOOl 
Itou J.Vf. 

c 




DE NOUVEAUX LOGICIELS, ACCESSOIRES, POUR VOTRE ORDINATEUR 


OüQOQCDü 

□GQÜOOQQ 

DOOOQQQQ 

ORIC 
ATMOS 
CBM 64 
AMSTRAD 


SUPERCODE III 
SPECTRUM _ 


THE SPECTRUM CONNECTION 



150 routines en langage machine 
directement exploitables peuvent être 
implantées dans tous vos program¬ 
mes Basic ou Langage Machine. 
Grâce au « menu » de ce logiciel vous 
pourrez sélectionner et sauvegarder la 
routine de votre choix. Des possibiiités 
inattendues s'olfrent à vous. Pour 
machine 16 ou 48 K. 

Notice en français. Compatible Micro¬ 
drive. 

Supercodc 3 - réf. su 14 - 225 F 
Supercode 2 - réf. su 07 -180 F 



MUSICTYPEWRITER 

Un système complet pour écrire et 
jouer de la musique. Réalisé par des 
musiciens professionnels,-il est facile¬ 
ment exploitable même sans rien con¬ 
naître à la musique. Vous pouvez soit 
composer, soit reproduire un morceau 
d’après une partition et les notes 
s’inscriront sur une portée musicale 
copiable sur imprimante ou sauvegar- 
dable sur cas sette. Livré avec un 
cache (pas pour SP -F ) reproduisant 
leclavierd’un piano. Rythme de 2/4 à 
15/8. 6 octaves. Métronome 23. à 
255. Mesures : 254. Correction d’é¬ 
criture. Edition. 

Spectrum 48 K - réf. se 02 -195 F 



Clavier Pro hd 31 - 685 F 
Interface Centronics 
avec câble hd 34 - 650 F 
Stylo Lumineux hd 47 - 385 F 
Synthétiseur de sons hd 05 
495 F 

Amplificateur do son câble Péritel 
+ son dans TV hu 23 -110 F 

Rallonge Péritel hu 34 - 170 F 

THEZX81 


Quickshot 11 hg 02 -140 F 
Trackball «Souris» hg 03 - 285F 
Interface Manettes hf 05. - 250 F 
Interface Manettes Programmable 
hg 07 - 400 F 

Connecteur Souple d’interface 
hu 08 -145 F 

Connecteur SouplB Inter Microdrive 
hu 35 - 93 F - (20 cm de long) 
Rallonge Centronics hu36-155F 

CONNECTION 


TRANS-EXPRESS 

Transférez facilement les programma 
mes 48 K Spectrum de : Cassette â-ff 
Cassette / Cassette à Microdrive / 53 a 
Microdrive â Microdrive / Microdrive || I 
à Cassette. Vous donne le nom caché ; 
du programme, sa longueur en octets' ! s “ 
l’adresse du début 
Machine) ou la ligne de lancement 
■automatique (Basic) et beaucoup 
d’autres possibilités. 

Trans-Express - réf su 18 -195 F 
Cassette à Microdrive uniquement-réf 
su 19-100 F 

Trans-Express Microdisquette -réf su 
20 -275 F 






Clavier Pro - réf. hd 32 - 685 F 
Clavier mécanique - réf. hd 33 - 140 F 
Synthétiseur de paroles - rét. hd 02 - 540 F 
Connecteur souple - réf. hu 09 - 145 F 


CATALOGUE 



WHITELIGHTNING __ 

Un fabuleux programme utilitaire qui. 
sans connaissance particulière du lan¬ 
gage machine, vous permet d’écrire 
facilement des logiciels prolession- 
nelS; originaux, rapides et de vous 
faire éditer sans payer les droits de 
Copyright qui sont laissés libres par 
les concepteurs de ce logiciel qui com¬ 
prend : 80 commandes supplémen¬ 
taires, 255 graphiques utilisateurs, 
fonctionnement de 2 programmes à la 
fois. FORTH intégré, combinaison de 
FORTH. BASIC. Langage Machine 
dans un même programme, 168 gra¬ 
phiques prédéfinis - Programme de 
démonstration. 

Spectrum 48 K - su 12- 250 F 


SOUND FX_ 

TOUS les sons des jeux de l’espace 
impossible à exécuter en Basic à voire 
portée. Ce logiciel se compose d’une 
multitude de sons réalisés en Langage 
Machine dont vous pourrez sauvegar¬ 
der tout ou partie pour les incorporer 
dans vos programmes. 

Spectrum 16/48 K - réf. su 08 -90 F 


1985 


20BESTPR0GRAMS 

Ecrits sur le Britannique qui connaît le 
mieux le Spectrum : Andrew Hewson 
auteur du fameux 40 Best Machine 
Code et de nombreux logiciels. Vingt 
meilleurs programmes utilitaires, 
mathématiques, stafisfiques, récréa¬ 
tifs. d’arcade, expliqués en détails. 
Spectrum - rét. hb 14 - 85F - 
120 pages. 



LA REFERENCE EN MICRO-INFORMATIQUE 

• 1 an de garantie totale. 

a Frais expédition et réexpédition inclus. 

• Pas de frais supplémentaire d'envoi à la 
commande. 

• Tous nos prix sont nets. 

• Recommandé gratuit à partir de 200 F 
d'achat. 

• Crédit de 4 à 21 mois. 

• (61) 21.49.55, pour résoudre vos 
problèmes. 

• Service après-vente assuré. 


Revendeurs, nous consulter 


BLACK CRYSTAL^ 

180K de programme pour le spectrum 
en 6 parties ! 

100 K de programme pour le ZX 81 en 
7 parties ! 

Aucune logithèque ne peut être com¬ 
plète sans ce logiciel d’aventure doté 
■d’un excellent graphisme et d’une 
qualité de présentation inégalée. 

ZX 81 - réf sg 284 - 150 F 
Spectrum 48 K - rét sg 285 -150 F 

| ASTRONOMER 




Un Planétarium pour qui veut tout con¬ 
naître sur notre galaxie : vue du ciel de 
n’importe quel en droit de la planète, 
traçage des constellations, vue de no¬ 
tre système solaire, phases de la lu¬ 
ne, plus de 1 000 étoiles montrées, co¬ 
mètes, astéroïdes. Manuel d’explica¬ 
tions en français. Comptabile impri¬ 
mante. 

Spectrum 48 K - réf. se 01 -150 F. 
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LIVRES 


U R VOTRE 


e La pratique du ZX 81 Tome 1 
par Xavier Linanl de Bellefonds 
72 8pages - 85,00 FF 


* Le petit livre du ZX 81 

parTrevorToms 

136 pages - 85,00 FF 


La pratique du ZX 81 Tome 2 « 102 programmes pour Sinclair 


par Marcel Henrol 

152 pages-95,00 FF 

• Etudes pour ZX 81 Tome 1 
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Si vous utilisez 
un ordinateur 
SINCLAIR 

(ZX 81, ZX 80, Spectrum, Spectrum + 
ou QL) ou si vous comptez en acheter 
un, sachez que la revue ORDI-5 
a été créée pour vous. Indépendante de tout 
iKU i^ Æk «ÆL constructeur ou importateur, O RD 1-5 vous 
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et indépendance les produits matériels et logiciels adaptables sur votre SINCLAIR. 
ORDI-5 vous tient au courant de toutes les nouveautés susceptibles de vous intéresser. 

Commandez un numéro ou... abonnez-vous, vous économiserez 20%. 

ORDI-5, pour tirer bien plus de votre SINCLAIR 
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à retourner à ORDI-5, 8 me Saint-Marc 75002 PARIS 
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Courrier des lecteurs 


Je vous serais reconnaissant de bien vouloir 
m'indiquer le moyen de charger sur les micro¬ 
disquettes du Spectrum les programmes 
achetés sur cassette afin de gagner sur le temps 
de chargement de ces programmes (Dr Patrick 
SERRES) 

- Nous avons l'intention de passer prochaine¬ 
ment un article sur les différentes techniques qui 
peuvent être utilisées. Sachez en tous cas qu’il 
existe dès à présents des ouvrages qui rensei¬ 
gnent de manière très complète sur ce pro¬ 
blème, par exemple le « Périphérie du Système 
Spectrum » tout récemment sorti aux éditions 
PSI. 


Vous serais-t-il possible de me vendre une copie 
du programme PERT (05 no 4). Comme j'em¬ 
ploie énormément les plannings dans ma profes¬ 
sion de constructeur, ce logiciel me serait fort 
utile (Jean-Daniel PERRET) 

- Malheureusement ORDI-5 n'est pas organisé 
pour faire ce genre de transactions, sa structure 


technique ne le lui permet pas ; en revanche 
nous allons faire suivre votre courrier à Monsieur 
FLEBUS, l'auteur de ce programme, à toutes 
fins utiles. 


J’aimerais que vous me donniez quelques ren¬ 
seignements sur la façon d’entrer du langage 
machine très long en une seule REM ; j’ai essayé 
mais je me trouve avec une REM qui prend tout 
l’écran et plus... (Fabrice MIGNON) 

- Vous trouverez dans la rubrique Trucs à Brac 
du présent numéro l’une des méthodes possi¬ 
bles pour créer une REM très longue. Une fois 
celle-ci créee, vous entrez la suite des codes 
avec un petit programme de chargement simple 
comme celui-ci : 

10 LET I = 16514 (pour 1000 codes par exem¬ 
ple) 

20 INPUT A 
30 POKE I, A 
40 PRINT I ;« » ;PEEK I 
50 SCROLL 
60 LET I = I + 1 
70 GOTO 20 


“LES AVENTURES” SONT LA! 


DES JEUX D’A VENTURE, ENTIEREMENT EN FRANÇAIS. 
AVEC GRAPHISME, PLAN DU JEU ET CASSETTE DE 
SAUVEGARDE. 

* LA MONTAGNE MAGIQUE. Quelque part dans la montagne, on a 
caché le Rouleau de la Sagesse. Vous partez à la recherche de ce Rouleau 
avec seulement un chapeau de magicien et une cassette en bois sur vous. 
Ce n'est pas grand chose, mais il y a de l'aide... 

* LA TOMBE DU PHARAON. Vous trouvez l'entrée d'une tombe an¬ 
cienne bloquée par un rocher. Si vous etes malin, vous pouvez obtenir 
tous les trésors. Mais attention : les Pharaons n'ont pas construit leurs 
tombes sans “etre sûrs que leurs trésors étaient bien protégés I 

En plus : «LA VILLE FANTOME» pour les débutants. (Essayer de 
trouver une pépite d'or dans une vieille mine près d'un village déserté 
et hanté par des fantômes...) 

BON DE COMMANDE A RETOURNER A : 

«LES AVENTURES» - 2 me Véron - 75018 PARIS 



LA QUETE DU CHEVALIER. 

Vous êtes un Chevalier de Camelot, et 
vous cherchez les trésors perdus de 
Merlin, Dans votre quête, vous trouve¬ 
rez le donjon de la sorcière, vous arra¬ 
cherez la princesse aux mains du magi¬ 
cien, et vous deviendrez très ami avec 
un nain. Plus de problème pour trouver. 


Nom : 

Adresse : 

Commande : 

. LA MONTAGNE MAGIQUE 

. LA TOMBE DU PHARAON 

. LA VILLE FANTOME 

. LA QUETE DU CHEVALIER 

Signature : 

Ci-joint : . FF par o C.C.P. o C.B. 


140 FF 
140 FF 
100 FF 
140 FF 
PORT 10 FF 

TOTAL :.. 
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Lorsque vous constaterez que vous avez fait une 
erreur, faites : 

BREAK/LET I = N (N est l’octet où l’entrée est 
mauvaise)/ GOTO 20 


Il y a certaines cassettes du commerce que je 
n’arrive pas à charger alors que j’ai fait régler 
l'azimuthage de ma tête de lecture (Bruno LE¬ 
MAIRE) 

- Reportez-vous aux premiers numéros 
d’ORDI-5 dans lesquels Patrick GUEULLE a lon¬ 
guement étudié les problèmes des chargements 
de cassettes : si vous êtes sûr de votre azimu- 
thage, c’est que les cassettes sont défectueuses 
et il faut les retourner au vendeur. 


Peut-on rendre le Spectrum compatible avec le 
système Télétel ? (H. Fombonne) 


- Tout dépend de ce que vous appelez compa¬ 
tible : si vous voulez récupérer l’écran d’un mini¬ 
tel comme moniteur, la réponse est à priori oui ; 
si vous voulez qu'il remplace le minitel, la ré¬ 
ponse est à priori non. Nous vous engageons, 
pour obtenir de bons éléments d’information sur 
ces questions, à lire l'un des ouvrages que nous 
analysons dans ce numéro « votre ordinateur et 
la télématique ». 


A propos de COWSPTÂP (ORDI5 n° 7) 

Tout d'abord, le programme a été écrit pour un 
ZX81 uniquement, c’est pourquoi l'adaptation 
sur un ZX Spectrum me semble délicate si les 
intéressés ne connaissent pas à fond les 2 ma¬ 
chines. 


- Aux lignes 1430... 1480 figure le sous- 
programme de sauvegarde sur K7 utilisant le 
Fast Load Monitor. Ceci explique l’adresse 
USR 30460 qui est le point d’entrée dans le FLM 
et la ligne de REM qui suit, qui est vitale pour le 
bon fonctionnement. Cette ligne indique que le 
FLM doit sauvegarder une fois le programme dé¬ 
nommé COMPTAP à la vitesse 9. 


Si le FLM n’est pas utilisé, il faut remplacer les 
lignes 1460 et 1470 par une ligne du type SAVE 
«COMPTAP». 

Quand à la ligne 980, elle permet de tester si la 
variable NS est bien comprise entre 0 et 9 (res¬ 
pectivement le code 28 et 37 sur le ZX 81 ). 


- La ligne 800 permet d’imprimer des petits 
points de séparations entre 2 opérations et d’af¬ 
ficher le n° de l’opération concernée (E-1). Pour 
lister les « N » dernières opérations, il faut que N 
ne soit pas nul !! (indication sur l’écran) autre¬ 
ment on revient tout de suite au menu. Pour la 
modification de la ligne 650, l’objectif était d’uti¬ 
liser la fonction INKEYS pour récupérer 2 carac¬ 
tères successifs le 1 er étant L pour demander 
une liste, le 2 e étant soit T pour une liste totale, 
soit un chiffre de 0 à 9 pour lister les « N » der¬ 
nières opérations avec au mileu de l’aquisition 
des informations, le clignotement de la flèche 
curseur. Pour pouvoir -utiliser ces fonctions, il 
faut évidemment avoir déjà rentré au moins une 
information en mémoire, sinon rien à afficher 
rien en mémoire ! Il faut bien respecter la syn¬ 
taxe de commande L puis, soit T, soit un chiffre 
de 0 à 9. Pour l’option C, du menu général, le 
second menu qui apparait permet de sélection¬ 
ner le n° de l’opération à partir de laquelle on 
veut commencer à cocher soit 0 si on veut 
toutes les voir, soit un chiffre <ou = au nombre 
d’opérations en liste puis évidemment NewLine 
pour valider. 


_G. PEDROLI 
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Courrier des lecteurs 


A propos du 7-0 (ORDI5 n° 4) 

1 - Deux lignes ont été perdues à la mise en 
page: 

460 GOSUB 9000 
470 RETURN 


2 - Les codes des deux petites routines en lan¬ 
gage machine sont les suivants : 


1 REM.... (13 octets exactement)... 


ADD HL, BC positionne HL sur le premier carac¬ 
tère à effacer. 

LD C, +11 nombre de lignes 
LD DE,+13 

Autre LD B, +20 nombre de caractères par ligne 
LD A, 0 

Ligne LD (HL), A effacement d’une ligne 

INC HL 

DJNZ LIGNE 

ADD HL, DE 

DEC C 

JR NZ AUTRE passage à la ligne suivante 
RET retour 


Poker ensuite : 

16514:33 

16515:191 LD HL, +959 
16516:3 
16517:62 

16518:163 LD A, +163 
16519: 215 RST 16 
16520:62 
16521 : 0 LD A, 0 
16522:43 DEC HL 
16523: 188 CP H 
16524:32 JR NZ -9 
16525:247 
16526:201 RET 

2 REM... (26 octets au minimum)... 
16533:42 
12 
64 
35 
1 

99 
0 
9 
14 
11 
17 
13 
0 
6 


16534 

16535 

16536 

16537 

16538 

16539 

16540 

16541 

16542 

16543 

16544 

16545 
16546: 
16547:20 
16548:62 

16549 

16550 

16551 

16552 

16553 

16554 

16555 

16556 
16557:244 
16558:201 


0 

119 

35 

16 

252 

25 

13 

32 


En espérant que cette mise au point dépannera 
les lecteurs qui sont restés « coincés », je vous 
prie de recevoir mes cordiales salutations. 


M.CHANAUD 


Le courrier technique de Patrick GUEULLE 


Ce n’est un secret pour personne que nos lec¬ 
teurs passent volontiers de longues heures de¬ 
vant leurs chers claviers ! Hélas, de nombreuses 
lettres viennent témoigner que du programmeur 
et de l’ordinateur, c’est le second qui se fatigue 
le plus vite... 


Les ZX 81 et même les SPECTRUM n’acceptent 
guère, surtout l’été, de « travailler » plus de deux 
ou trois heures de suite, et respectent cette 
consigne si scrupuleusement qu’il est permi de 
se demander s’ils n’appliquent pas la réglemen¬ 
tation régissant le repos des chauffeurs routiers ! 


En fait, c’est la chaleur qui les incommode : plu¬ 
sieurs circuits intégrés à forte dissipation se 
trouvent réunis dans un volume des plus réduits, 
ne comportant guère d’orifices de ventilation 
(surtout si le connecteur arrière est utilisé) et la 
température interne de l’ordinateur dépasse la li¬ 
mite admissible d'autant plus rapidement qu’il 
fait plus chaud dans ses environs immédiats. 


fonction réaliser l’effacement rapide des deux 
dés. 


Nota : voici les mnémoniques : 
LS HL, (+16396) 

INC HL 
LD BC 


Si l’on souhaite éviter (ou du moins réduire) ces 
agaçants phénomènes sans pour autant trans¬ 
former en gruyère le capot de sa machine, on 
peut recourir à des solutions électroniques : 

On peut, tout d'abord, remplacer le micropro- 


IO-ORDI-5 n° 11 mars 1985 








cesseur Z 80 A monté d'origine par une version 
à faible consommation. Le Z 80 L (c’est son 
nom) est un peu moins rapide que le Z 80 A 
mais accepte généralement, s’il est de bonne 
qualité, de « tourner » sur les machines Sinclair. 


Pour procéder à cet échange, il faut bien sûr que 
le Z 80 soit monté sur un support, et... que l’on 
ose ouvrir la machine ! 

Une autre solution consiste à intervenir de l’exté¬ 
rieur : 

Les machines Sinclair sont normalement desti¬ 
nées à fonctionner sous une tension continue de 
9 volts, des régulateurs internes se chargeant 
d’en dériver les tensions précises exigées par les 
différents circuits utilisés. 


Or, les blocs secteur livrés d’origine fournissent 
jusqu’à 16,5 volts, surtout en l’absence d’acces¬ 
soires « gourmands » du genre de l’imprimante. 
Une telle « suralimentation » entraîne un échauf- 
fement excessif des régulateurs qui peuvent soit 
« disjoncter » grâce à leurs protections incor¬ 
porés, soit échauffer suffisamment les compo¬ 
sants voisins pour leur faire commettre des er¬ 
reurs. Au bout de quelques heures de ce 


traitement, on voit souvent l’écran devenir gris 
(indiquant que toute la mémoire s’est vidée), 
mais des phénomènes bien plus subtils peuvent 
se produire : un lecteur nous signale l’apparition 
de « 4 » en haut de son écran, caractères qu’il 
est fortement déconseillé d’approcher sous 
peine de « plantage » définitif de la machine ! 
Une solution consiste à remplacer le rustique 
bloc secteur d’origine par une véritable alimen¬ 
tation stabilisée 9 volts 1 à 2 ampères (selon la 
machine, le SPECTRUM étant plus gourmand 
que le ZX 81 ), en respectant scrupuleusement la 
polarité du jack de raccordement. Une inversion 
serait en effet fatale à l’ordinateur, ce qui risque 
de se produire si l’on tente d’utiliser des blocs 
secteurs destinés à d’autres ordinateurs. Les 
machines ORIC, en particulier, sont livrées avec 
des blocs secteur dont la fiche, exactement 
semblable à cell du SPECTRUM, est de polarité 
inverse... A bon entendeur ! 

Il est encore plus simple de considérer le bloc 
secteur d’origine commé la première partie 
d’une alimentation sérieuse, et d'intercaler sur 
son fil un montage régulateur comme on en 
trouve dans toutes les revues d'électronique. 

On peut même se limiter à monter en série dans 
ledit fil, autant de diodes IN 4001 qu'il y a de 
fois 0,7 vols à chuter, mais il ne s’agit plus vrai¬ 
ment d’une régulation ! 

Voici, à notre sens, l’un des montages offrant le 
meilleur « rapport qualité-prix » : 



Jack vers 
ZX 81 ou 
Spectrum 


On n’oubliera pas de monter le circuit intégré « 3 
pattes » LM 7808 sur un refroidisseur (ou radia¬ 
teur) largement dimensionné, car c’est lui qui 


aura à évacuer les calories dont on souhaite 
soulager l’ordinateur ! 

_Patrick GUEULLE 
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Sinclair Flash 



A la fin du mois de septembre 1985, Sinclair 
avait vendu 275000 ordinateurs en France. 

SINCLAIR espère vendre de 80.000 à 100.000 
Spectrum en Yougoslavie en 1985. 

Une antenne Sinclair va être implantée à Singa¬ 
pour pour attaquer l’extrème-orient avec une 
version « asiatisée » du QL : une bonne contre- 
attaque à l’endroit des MSX. 


Microcartouches explosives 

Les microcartouchês vendues un jour sous cel¬ 
lophane comme des cassettes ? Le premier lo¬ 
giciel distribué sous cette forme sur le continent 
est un FORTH de la maison SEMAPFIORE, le 
SMF 1.1., pour 455 FF, cartouche et manuel 
compris. 

Le QL est basé sur un puissant microprocesseur 
dont la programmation directe n'est pas une af¬ 
faire de débutant. Ceux qui auront le cran de 
tenter l'aventure seront désormais aidés par une 
microcartouche Editeur/Assembleur du lan¬ 
gage-machine du QL commercialisée par l'édi¬ 
teur McGRAW-HILL. 


Du hit logiciel au kit matériel 

La firme Spectre a mis au point deux logiciels du 
plus haut intérêt pour les électroniciens : ELEC¬ 
TRONICS qui dessine les circuits digitaux et 
LINNET qui analyse les réseaux linéaires. Les 
différents symboles électroniques peuvent être 
mis en rotation, disposés, inversés interactive¬ 
ment sur l’écran. Ces logiciels ne peuvent certes 
traiter que des circuits d'importance limitée mais 
leur utilité est certaine. 

ERE Informatique a récemment créé, coup sur 
coup, trois logiciels remarquables dont nous 
vous reparlerons : 3D MOVER, un programme 
de C.A.O. qui permet de définir des objets en 
trois dimensions et de les faire se mouvoir, 
PRINT +, qui multiplie considérablement les 
possibilité d’affichage et d'impression du Spec¬ 
trum en matière de traitement de texte et de ta¬ 
bleurs, et VOX, qui réalise une mini-synthèse vo¬ 
cale entièrement logicielle. 


Pour les possesseurs de Spectrum ancienne 
manière que le nouveau « look » du Spectrum 
« Plus » brancherait spécialement, ils n’ont qu’à 
avoir un peu de patience : Sinclair commercia¬ 
lise déjà un clavier indépendant (il en coûte seu¬ 
lement 30 livres outre-manche ) dans lequel il 
est possible d’ajuster la carte interne de leur ap¬ 
pareil en défaisant tout au plus quelques vis. 

Pour les nostalgiques de la petite imprimante 
Sinclair, qui pouvait se glisser dans une poche, 
voici une nouveauté qui s'en rapproche par les 
dimensions, tout en bénéficiant d’un certain 
nombre d’améliorations : l’imprimante FLOYD 
40, qui peut imprimer en double hauteur et/ou 
en double largeur et même en inversé blanc sur 
noir ; elle coûte environ 80 livres anglaises, mais 
elle est irlandaise. 

Une Interface Joystick intelligente made in 
France pour le Spectrum est la première réalisa¬ 
tion d’une société nouvellement fondée, ORDI- 
VIDUEL. Le principe de cette interface est sim¬ 
ple et intéressant : après avoir chargé un 
programme sur cassette fourni avec l’interface, 
on donne le titre de chaque jeu interactif auquel 
on veut coupler le Joystick en définissant les dif¬ 
férentes commandes (montée, descente, etc.). 
Par la suite il suffit de donner le titre d’un jeu 
pour que l’interface soit automatiquement pro¬ 
grammée pour lui. 


Rumeurs... 

Le QL devrait arriver en version AZERTY - ce qui 
présente un intérêt primordial pour les applica¬ 
tions traitement de texte - vers le mois de mars 
1985... 

Un Spectrum portable avec un microdrive et un 
écran plat pour moins de 300 livres anglaises ? 
Les rumeurs se font de plus en plus insistantes à 
ce sujet mais le mystère est total en ce qui 
concerne la date de sortie. 


et certitudes... 

VTR informatique, qui commercialise de nom¬ 
breux accessoires et produits pour ZX vient 
d'ouvrir une nouvelle boutique à Lyon. 

La firme KELWOOD, qui produit en particulier 


12-0RDI-5 n° 11 mars 1985 




ADRESSES DES SOCIETES MENTIONNEES 


oooDooooaao 

dooooodoood 

, ^^p^oacjocjEjn, 

onnanonoona 



un joli clavier mécanique pour le Spectrum, dis- , 
tribue désormais ses accessoires en France. Les 
lecteurs intéressés par un catalogue peuvent 
s’adresser à M. Michel Lesieur (Kelwood), BP 
53, 77350 Le Mee / Seine. 


CREE, 138 avenue Thiers, 69006 LYON 

DIDECAR Marketing, Rue du Planiau 1, 1301 
BI ERG ES, Belgique, tel 02 :654 06 11 

ERE Informatique, 27 rue de Léningrad, 75008 Paris, 
tel 387.27.27 

FLOYD, 1533 Merrion Road, Dublin 4, Irlande 

McGRAW-HILL Book Company (UK) Ltd. Maiden- 
head, Berkshire, SL6 2QL. 

ORDIVIDUEL, 20 rue de Montreuil, 94300 VIN- 
CENNES 

SEMAPHORE, Jean Pierre Cardinaux, CH-1283 La 
Plaine (Genève) SUISSE 

SPECTRE, Enfield House, Swardeston, Norwich, Nor¬ 
folk, G.-B. 


La maison Dldecar Marketing de Bruxelles, qui 
distribuait notamment les logiciels Sémaphore, 
n’existe plus. Les clients dont la commande 
n’est pas encore honorée doivent s’adresser, 
non à Sémaphore Suisse, mais à Didecar direc¬ 
tement, pour obtenir un remboursement ou la li¬ 
vraison des marchandises payées. 

Une disquette pour ZX 81 ? Un serpent de mer 
qui resurgit régulièrement ; pourtant un matériel 
sérieux vient enfin de faire son apparition sur le 
marché français : il est produit par CREE de 
Lyon. Nous vous en reparlerons après un essai 
complet à la rédaction. 


VTR MICRO LYON, 49 rue de la Charité, Quartier Per- 
rache, 69002 LYON 


CLUBS 

Le Centre Socio-Culturel RAIL ATAC, de Louvroil, a 
fondé un club, OCTOPUCE, qui met à la disposition de 
ses membres une batterie de 6 ordinateurs ZX 81 
Renseignements : OCTOPUCE RAIL ATAC, rue Ca¬ 
mille Guérin, 59720, LOUVROIL, Tel : 65 85 80 

HEADCLUB regroupe les Bruxellois passionnés de 
Spectrum; renseignements : M. Van GOSSUM, 14 
avenue des Eglantines, 1150 Bruxelles. 


Trucs à brac 

M. Decomble a quelques trucs à confier en vrac qui lui ont été suggérés 
par le courrier des lecteurs. 


Fast load 

Est-il possible de faire appel au Fast-Load 
directement à partir d’un programme basic sans 
passer par le Menu ? (Cl. Jay). 

Pour sauvegarder sur K7, il faut intégrer dans un 
programme : 

9000 RAND USR 30460 
9010 REM S76XXXXXXXXXX 
(S = SAVE) 

(7 = Vitesse 7 du FAST-LOAD) 

(6 = Programme SAUVE 6 fois) 

Lorsque le programme basic, (ou faire en 
direct = GOTO 9000) arrive à la ligne 9000, il 
sauve automatiquement 6 fois le programme 
dont le titre a été mis à la place des X. 

Pour entrer d’après K7 on peut intéger dans un 
programme ; 

10 RAND USR 30460 
20 REM L7XXXXXXXXXX 
(L = vitesse 7 du FAST-LOAD) 

(Le FLM connait le nombre de sauvegardes) 
Lorsque le programme basic, (ou faire en 
direct = GOTO 10) arrive à la ligne 10, il sauve 
automatiquement 6 fois le programme dont le 
titre à été mis à la place des X. 


Enfin, pour appeler le « DUMP » (fenêtre sur le 
contenu des mémoires) il est possible d'écrire 
une ligne de programme : 

9780 RAND USR 31206 

Dans ce cas, pour retourner au basic, il faut faire 

«Y» 


Mille de REM 

2/ Auriez-vous un moyen simple de faire une 
REM de 1000 octets ? (L. HELMSTETTER) 

- Exemple pour 1000 octets : 

faire une ligne numéro 1 de 94 lettres X 

- Exemple 1 REM XXXXXXXXXXXXXX... 

Dupliquer 10 fois cette ligne en faisant 
«SHIFT/EDIT » et en modifiant les n os de lignes 

- Ex. 1 REM XXXXX... 

2 REM XXXXX... 

3 REM XXXXX... 

Faire « LIST » et « SHIFT/EDIT » 

Ajouter 6 nouveaux caractères à la ligne 1. 

Ces 6 caractères représentent = 

* 2 octets pour le numéro de la ligne de 1000 
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* 2 octets pour la longueur de cette ligne 

* 1 octet pour le titre « REM » 

* 1 octet pour le code HEXA=76 
(décimal = 118) qui indique la fin d’une ligne. 

- Poker la longueur de la future ligne, soit 1000 
octets + 1 pour la fin de ligne, soit 1002 octets 
1002 = 3*256 + 234 

- Entrer en direct : 

POKE 16514,234 
POKE 16512,3 

(En 16513, on a «REM») 

POKE 16514,118 
POKE 16515,118 


Ligne invisible 


3/ Comment est-il possible d'empêcher une 
ligne d’un programme ZX 81 d’apparaitre au 
listage de l’écran ? (J.-Ch. MONTOYA) 

Pour empêcher le listing et le démarrage d’un 
programme, faire en commande directe : 

(où par une ligne basic) 

- 10 POKE 16509,99 

Le retour à la normale s'obtient par POKE 
16509,0 

Le programme disparait si l’on POKE un numéro 
16383 à cette adresse, ici, 99*256 = 25344 
Pour empêcher d’éditer la première ligne d'un 
programme, faire en commande directe : 

(ou par une ligne basic) 

- 10 POKE 16510,0 

Le retour à la normale s’obtient par POKE 
16510,5 

(5 devient le n° de ligne) 

Pour rendre invisible la première ligne d’un 
programme, faire en commande directe : 

(où par deux lignes de basic) 

- 10 POKE 16514,118 

- 20 POKE 16515,118 

Le retour à la normale s’obtient par POKE 
16514,0 et POKE 16515,0 
En « POKANT » 0 en 16514 et 16515, la 
première ligne du programme apparait encore à 
l'appel de « LIST », mais ne réagit à « RUN » que 
par l'affichage d’un 0 ... ou par d’autres valeurs II 


A propos des routines d’affichage (ORDI 5 
n° 3 et 4) 


D'abtre part, et entre autres fonctions, cette rou¬ 
tine appelle SCRUT dans sa 2 e partie, puis gé¬ 
nère l’affichage dans sa 3 e partie en appelant 
VIERGE et CARAC ; et cela 50 fois par sec. 

Supposons que vous appuyez sur une com¬ 
mande, RUN par exemple, d’adresse X (c’est 
l’interprèteur Basic qui choisit et dirige cette 
adresse) ; la routine SCRUT saisit votre com¬ 
mande. Voyons ce qui se passe quand vient l’af¬ 
fichage : 


- En 658 il y a POP IX qui retire cette adresse 
641 pour la mettre dans IX ; maintenant c’est 
l’adresse X qui se trouve en tête de pile. 

- En 674 il y a OUT (FE), A : cette instruction 
commande le C.l. 1 spécialisé, propre à Sinclair. 
A partir de ce moment le C.l. 1 envoie un signal 
0 sur la ligne NMI toutes les 280 T ou 64 micro¬ 
sec. 

- En 680 il y a RET, donc retour à l’adresse X 
(ou quelque part dans cette routine), et votre 
programme s’exécute. Il sera interrompu 55 fois 
par la routine NMI, puisque celle-ci est appelée 
toutes les 208 T. Ensuite l’instruction 122 de la 
routine NMI envoie une instruction au C.l. 1 et, 
celui-ci n’enverra plus de signal 0 sur la ligne 
NMI. L’instruction 124 renvoie à 641 puisque IX 
contient cette adresse. 

- En 648 il y a CALL CARAC 

- En 697 il y a El qui rend les interruptions INT 
possibles chaque fois qu’un signal 0 est envoyé 
sur la ligne INT. Cela se fait matériellement (par 
hardware comme disent les Anglais) puisque la 
ligne INT du microprocesseur est reliée à la ligne 
A6. La routine INT sera appelée 192 fois pour 
générer l’affichage. Elle dure chaque fois exac¬ 
tement 208 T donc ie temps d'un balayage hori¬ 
zontal de l’écran, en synchronisme avec ie C.l. 1 
qui envoie le signai vidéo vers la TV. 

- En 652 il y a de nouveau CALL VIERGE pour 
les 55 lignes vierges de balayage en dessous de 
l’affichage et, NMI exécute à nouveau la suite de 
votre programme. 


Vous voyez également pourquoi on ne peut em¬ 
ployer les registres IX et A’F’ (2 e jeu de AF) dans 
un programme en C.M. (comme le dit le manuel 
Sinclair). 


Vous voyez aussi pourquoi, en mode FAST, vo¬ 
tre programme s’exécute également pendant les 
192 lignes de balayage horizontal qui étaient 
consacrées à l’affichage ; la vitesse d’exécution 
augmente, l’affichage disparaît et l’image décro¬ 
che. 


La routine RAP, s’étend de 553 à 657, s’exécute 
toutes les 20 m/sec., parce qu'elle dure 
20 m/sec. et qu’elle boucle sur elle-même. Elle 
s’exécute donc constamment. Cette routine, 
comme celles qu’elle appelle, contient des sauts 
conditionnels. J’ai mis l'accent sur le fait que 
quel que soit le chemin parcouru, la durée d’exé¬ 
cution reste toujours la même. _M. HENROT 
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Un tas de 



awec 



TASPRINT de Sémaphore* est destiné à tous ceux qui possèdent une 
imprimante graphique interfacée à un Spectrum 48K, et qui désirent 
doter leur imprimante de possibilités nouvelles. 

Un long Basic affiche successivement, en français, les instructions à 
suivre pour personnaliser votre version TASPRINT. Les choix que vous 
devez faire à cet effet, portent sur l’interface, l’imprimante et les polices 
d© caractères 

Le Basic propose une dizaine d’interfaces parmi les plus vendues sur le 
marché, et également une dizaine d’imprimantes graphiques les plus 
courantes : si vous possédez l’une de ces interfaces et l’une de ces 
imprimantes, vous poussez sur une touche et le Basic personnalise 
votre version TASPRINT. Dans le cas contraire, vous devez entrer vos 
codes ; le Basic vous aide en vous posant des questions précises. 



5 poiices parallèles ne vous empêche de créer votre propre police 

de caractères ou de graphiques. Vous disposez 
Le Basic demande ensuite si vous désirez une, de 160 points pour dessiner chaque caractère et 
ou plusieurs, ou toutes les polices de caractères ensuite vous calculez vos 20 octets, 
disponibles : il y en a 5. La question se justifie 

parce que chaque police de caractères occupe En bref, c’est un logiciel excellent 
1920 octets de mémoire et que, si vous em¬ 
ployez simultanément des programmes gour- Ajoutons que la cassette contient 2 versions de 

mands en mémoire, vous auriez peut-être des TASPRINT : l’une d’usage général et l’autre 

problèmes. En choississant les 5 polices, votre compatible avec TASWORD qui est un autre lo- 

version TASPRINT emploie l’espace mémoire à giçiel de la firme Sémaphore que nous avons 

partir de l'adresse 5240 ; il vous reste donc plus déjà présenté à nos lecteurs, 

de 2800 octets pour vos programmes. 

Nous reproduisons ci-dessous un échantillon de * Le circuit de distribution de Sémaphore ayant 
caractères des 5 polices. connu récemment des changements, le lecteur 

Chacun des 96 caractères affichables s’imprime est invité à vérifier que le logiciel ci-dessus ana- 

en 2 passes de l’imprimante graphique. Chaque lysé est bien toujours commercialisé sous ce 

passe imprime de 0 à 8 points verticaux, et cha- nom. 

que caractère s’étale sur 10 points horizontaux. 

Il faut donc 20 octets pour définir chaque carac¬ 
tère affichable, soit 1920 octets par police. Rien ------ M. Henrot 
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JEUX 


L es meilleures cassettes 
du moment 


Les cassettes de jeu se multiplient pour le ZX 81 et le Spectrum. Ce 
mois-ci, au lieu de sélectionner les cinq cassettes qui nous ont le plus 
séduits par leur originalité, leur rapidité ou leur graphisme, nous allons 
recencer globalement tous les logiciels qui passent la barre de la 
banalité. Ce sont tous, chacun dans leur genre, des jeux qui ne 
déçoivent pas et qui sont bien conçus. Naturellement certains relèvent 
d’un genre où il y a profusion : il appartiendra aux amateurs de savoir si 
une n-ième version du jeu dont ils sont fanatiques vaut la peine d’être 
achetée ; mais pour ceux qui les découvrent, les cassettes relevées ne 
constituent pas une erreur, elles en donnent toujours pour leur argent 
(prix moyen entre 120 et 180 F). Attention : la liste suivante ne 
correspond à aucun classement de qualité. 



Variante bien française du jeu de Président, la 
stratégie de l’arrivisme. 


La ballade du lutin, Loriciels, 
Spectrum 48K 

Les différents dangers d’une forêt pleine de 
pièges au centre de laquelle se trouve une jeune 
fille qu’un lutin doit sauver. 


L’île maudite, Loriciels, Spectrum 

Jeu d’aventures ; ici ce n'est pas un château ou 
une caverne qui fait office de cadre hostile, mais 
une ile avec ses particularités : singes, indi¬ 
gènes, etc. 


La montagne magique, Phipps Ass., 
Spectrum 48k 

Jeu d’aventures dans lequel le cadre est celui de 
ia mythologie germano-nordique fantaisiste. 
Une cassette du genre des ouvrages de Tolkien. 


La tombe du pharaon, Phipps Ass. 
Spectrum 48k 

Jeu d’aventures, le cadre est celui de l’Egypte 
ancienne : désert et hiéroglyphes. 


Countries of the world, Hewson 
Consultants, Spectrum 16/48K 

Une manière colorée d'apprendre à la fois l’An¬ 
glais et la géographie : de très belles cartes en 
couleurs. 


César the cat, Mirrorsoft, Spectrum 
48k 

Grande guerre entre le chat et les souris à l’inté¬ 
rieur d’un garde-manger ; beaucoup d’humour 
dans les graphismes. 


Argolath, Loriciels, ZX 81/16K 

Mélange d’aventures et de labyrinthe. 


La course aux lettres, Loriciels, 
Spectrum 

Logiciel éducatif axé sur l'apprentissage de la 
lecture : y joueront sans doute davantage les en¬ 
fants qui ont déjà des bases dans ce domaine. 


Psytron, Beyond, Spectrum 48K 

Défense d’une base contre des envahisseurs : 
l’écran affiche simmultanément plusieurs ta¬ 
bleaux d’action. Très dur à jouer. 
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Painting Joe, ERE Informatique, 
Spectrum 16/48R 

Variante intéressante du « pinkie pig » des 
cafés : il faut contourner des rectangles en évi¬ 
tant les mauvaises rencontres. 


Androïde,ERE Informatique, 
Spectrum 16K 

Jeu de labyrinthe, dans lequel on est poursuivi 
par quatre robots ; bonne rapidité, bon gra¬ 
phisme. 


Don Juans et dragueurs, ERE 
Informatique, Spectrum 48K 

Un jeu d’aventures dans la carte du tendre de 
l’époque « look » : le jeu n’est pas très fouillé 
mais le propos est plein d'humour. 


Lombrix, ERE Informatique, 
Spectrum 48k 

Un jeu qui tient du labyrinthe et du serpent ; jo¬ 
lies couleurs. 



Traffic, Loriciels,ZX 81/16K 

Un frogger humain assez vif. 

Oaytona, No SVian’s Land, ZX 81/16K 

Pilotage rapide et dangereux. 

Snake Link, No Man’s Land, ZX 81 
/16K 

Version simple mais agréable à jouer, du jeu cé¬ 
lèbre. 


World cup, Artic, Spectrum 48k 

Simulation de Foot-ball très colorée. 

Fire-Fox, Space Mission, Indescomp, 
ZX 81/16K 

Jeu honnêtement réussi de guerre des étoiles. 

Ruine, Loriciels, ZX 81/16K 

Casse-brique très rapide à trois raquettes et 
trois niveaux de difficulté. 


ORDI-5 n° 11 mars 1985- 17 



































BIBLIOGRAPHIE 


5 livres lus pour vous 


Périphérie du système Spectrum 
ZX Spectrum et Spectrum + 

Par Xavier Linant de Bellefonds 
Editeur PSI 
Paris 1985, 128p. 


Le Spectrum est un ordinateur très courtisé par 
les auteurs informatiques. Le nombre des ou¬ 
vrages consacrés à cet ordinateur performant 
est très élevé, qu’ils portent sur le Basic ou l'as¬ 
sembleur de cet appareil. Pourtant la littérature 
spécialisée n’était pas tout à fait complète puis¬ 
qu’un élément essentiel du Spectrum n'était 
pratiquement pas couvert : l'interface ZX 1 et le 
microdrive considérrés comme une addition fon¬ 
damentale transformant l’ordinateur en un sys¬ 
tème complet et performant. Voici donc un livre 
bienvenu quoique tardivement venu (le micro¬ 
drive est arrivé bien tardivement lui-même ), 
mais il semble que le lecteur intéressé par le sys¬ 
tème étendu n’ait rien perdu pour attendre car 
ce travail nous a paru très sérieux et bien orga¬ 
nisé. 



Le livre est divisé en trois parties, de difficulté 
progressive : dans la première, l’auteur introduit, 
avec simplicité et clarté, l’amateur dans les en-, 
trées-sorties du Spectrum et décrit le Basic 
étendu qui permet de gérer efficacement celles- 
ci. On découvre à cette occasion, que certaines 
des fonctions du Basic étendu peuvent parfaite¬ 
ment être utilisées sur la version « nue » du 
Spectrum, ce qui élargit considérablement le 
cercle des lecteurs potentiels de ce livre très di¬ 
dactique. 


La deuxième partie est consacrée à une présen¬ 
tation complète du microdrive, dans ses méca¬ 
nismes, ses méthodes de stockage et ses possi¬ 
bilités (remarquables) en matière de gestion de 
fichiers. L’auteur n’a pas hésité à traiter à fond 
une question qui préoccupe de nombreux 
« spectromanes », à savoir la transcription sur 
microcartouches des logiciels sur cassettes. 


ments sur les voies et les canaux, propose aussi 
plusieurs beaux programmes illustratifs. Ber¬ 
trand CLERGEOT, dont on a vu certains pro¬ 
grammes spectaculaires dans ORDI-5 a d’ail¬ 
leurs apporté sa collaboration sur ce plan. 

En conclusion, ce livre qui répond à une attente 
ne la déçoit pas. Notre appréciation extrême¬ 
ment favorable sera plus mesurée sur deux 
points : peut-être certains développements diffi¬ 
ciles auraient mérité plus d’exemples et il est 
dommage que l’auteur ait décidé de ne pas étu¬ 
dier systématiquement l'interface RS 232, éga¬ 
lement présente dans l’interface ZX 1. 

___F. B. 


Jeux sur le Spectrum 

James, Gee, Ewbank, Piloquet 


MODULO-BELIN 


La troisième partie est dédiée aux program¬ 
meurs confirmés puisque deux chapitres abor¬ 
dent des applications en langage machine, par 
exemple la possibilité de créer ses propres ins¬ 
tructions et mots-clef, c'est-à-dire en quelque 
sorte d’étendre son Basic à la demande. Cette 
partie initie également le lecteur aux mystères 
du réseau local, autre possibilité fascinante de 
l’appareil. 


Cet ouvrage où les éléments théoriques sont 
vraiment solides, notamment les développe- 


Vingt et un programmes de jeux en couleurs et 
sonorisés dans un ouvrage de cent douze 
pages : la « bonne affaire à saisir », annonce fiè¬ 
rement l’éditeur. 

Retranchons les pages explicatives (d’ailleurs 
fort bien faites et souvent intéressantes), procé¬ 
dons à une division, et nous arrivons à une 
moyenne de deux à trois pages par programme. 
Voilà qui dément l’affirmation de la quatrième de 
couverture, présentent les jeux de l’ouvrage 
comme l’égal des meilleurs logiciels sur cassette 
du commerce. 

Soyons sérieux ! Un programme vendu sur cas¬ 
sette est considérablement plus long, et écrit au 
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James Gee Ewbank Piloquet 


Les programmes présentés, de genre assez di¬ 
vers, traitement de texte, ardoise magique, le 
mot caché, etc, sont tous précédés d’une ana¬ 
lyse brève mais utile de leur structure. Ce sont 
en revanche des programmes plutôt longs à en¬ 
trer et sans docmentation interne : ils seront par 
conséquent assez difficiles à modifier pour les 
adapter au contexte d’une classe ou les affiner 
en fonction de tel objectif particulier. Ces pro¬ 
grammes ayant surtout une fonction d’éveil, il 
est clair que le temps utilisé pour la saisie ne 
peut être rentabilisé que si ils sont mis en oeuvre 
par plusieurs enfants ; dans ce cas un certain 
aspect émulatif peut venir renforcer un intérêt 
qui risque de paraître un peu limité pour ceux 
que la pédagogie ne concerne pas directement. 

Une bibliographie bien équilibrée et informative 
termine l’ouvrage, ce qui est plutôt rare dans les 
livres d’informatique individuelle. 


moins partiellement en langage machine : bref, il 
serait à peu près impossible à saisir au clavier au 
seul vu de son listing. 

Les auteurs ont su se mettre à la place de leurs 
lecteurs, en leur proposant des logiciels dont la 
frappe ne tournera pas au supplice chinois. 

En contrepartie, il est clair que les performances 
obtenues en matière de rapidité d’action, de 
réalisme des graphismes, ou de simultanéité en¬ 
tre mouvements et effets sonores n'atteindront 
pas des sommets. 

Il ne s’agit donc pas de « jeux d’une qualité ex¬ 
ceptionnelle » (sic.), mais tout simplement 
d’honnêtes logiciels ludiques tels qu’on s’attend 
à en trouver dans un livre ou une revue. Pas 
plus, pas moins. 

Le possesseur d'un SPECTRUM désirant étoffer 
sa bibliothèque de programme grâce à quelques 
jeux en aura assurément « pour son argent ». En 
prime, une lecture attentive pourra même lui 
faire découvrir quelques « astuces » de program¬ 
mation de nature à lui servir plus tard. 
L’inconditionnel des jeux « à grand spectacle » 
sera cependant déçu : il ne trouvera pas ici, à 
des prix « sacrifiés », les programmes qu’il 
achète d’habitude au prix fort sur cassettes, et 
c’est parfaitement normal : 

Le contraire serait un double miracle, commer¬ 
cial et technique : cela se saurait ! 


S.G. 


L’enfant aux commandes de l’ordinateur 

Par Le Docteur Denis KRIEGER 
Editeur EYROLLES, 

Paris 1984, 128 pages. 

Denis KRIEGER fait part dans ce livre d’un cer¬ 
tain nombre d’expériences d'enseignement as¬ 
sisté par ordinateur menées dans un centre mé¬ 
dico-psycho-pédagogique.. Le lecteur sera sans 
doute davantage intéressé par ies différents pro¬ 
grammes qu'il contient que par les chapitres in¬ 
troductifs, de caractère scientifique et très cir¬ 
constanciés. Cependant tous ceux qui ont 
envisagé d'utiliser un ordinateur domestique 
dans une finalité pédagogique trouveront là des 
renseignements précieux sur le choix des mé¬ 
thodes et la réceptivité des enfants. 



, F. B. 


L’assembleur du ZX specîrum 

lan Sinclair 

Hachette Informatique 


Traduction d’un ouvrage anglais ayant large¬ 
ment fait ses preuves, le livre fait partie des « va¬ 
leurs sûres » de la volumineuse bibliothèque 
consacrée au SPECTRUM. ... 

Nous n’irons pas jusqu’à dire qu’il s’agit la du 
meilleur titre pour qui désire attaquer l’assem¬ 
bleur sur cette machine. Plusieurs approches 
sont possibles pour amener le programmeur 
BASIC à passer la « vitesse supérieure ». 
lan SINCLAIR (qui n’a d’ailleurs pas le moindre 
lien de parenté avec « l’oncle Clive ») a choisi 
d’être complet : son livre est organisé comme un 
cours universitaire. 

Le lecteur est donc invité à se familiariser avec 
les bases de l’électronique digitale, puis avec le 
vocabulaire si particulier de l’informaticien, car 
ses connaissances en la matière sont supposées 
nulles : pas très flatteur, mais prudent I Cesgé- 
néraiités occupent environ la moitié de l’ou- 
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vrage. Heureusement, le style est alerte (un bon 
point pour le traducteur qui a su préserver cette 
qualité), et le « cours magistral » entrecoupé de 
« travaux pratiques » au clavier, courts mais 
utiles. 

Pas un seul octet de langage machine jusqu’à 
présent : on ne rentre que fort tard dans le vif du 
sujet, ce qui ne permet évidemment pas d'aller 
aussi loin que le laisserait supposer la lecture de 
la quatrième de couverture. 



Il ne vous suffira pas d’acheter ce livre pour pou¬ 
voir « lire des bandes de ZX 81, renuméroter les 
lignes BASIC, ou accélérer l’affichage graphi¬ 
que ». 

Soyons clair : cet ouvrage a évidemment été 
écrit dans un but pédagogique, et à ce point de 
vue le contrat est rempli. Le lecteur program¬ 
mant tout juste en BASIC pourra, s’il fait l'effort 
de parcourir en entier le chemin qui lui est tracé, 
s’attaquer ensuite à la lecture des deux ou trois 
autres titres nécessaires pour véritablement 
maîtriser l'assembleur. Tant que ce stade ne 
sera pas atteint, on ne se leurera pas en s'imagi¬ 
nant pouvoir obtenir des résultats dignes des lo¬ 
giciels du commerce... 

Tout au plus pourrez-vous localiser une ligne de 
programme dans la mémoire de la machine, 
bien plus vite qu'en BASIC. D’autres livres vous 
offrent des programmes machine « clé en 
main », performants, mais sans vous permettre 
d’en comprendre le fonctionnement : à vous de 
choisir ! 


ce secteur en plein développement. Mais voilà : 
comment être au fait de l’essentiel dans ce do¬ 
maine sans se plonger dans des revues rébarba¬ 
tives et d’une redoutable technicité, d’un côté, 
ou les livres un peu baratineurs de tels person¬ 
nages journalistico-politiques séduits par les 
promesses du futur, de l’autre ? 

En ce qui nous concerne, nous qui étions igno¬ 
rants de ces problèmes, il a suffit d’une courte 
lecture pour cesser d’avoir l’air bête lorsque le 
terme fatidique de « télématique » est lancé 
dans une conversation... Cette lecture c’est le 
dernier ouvrage de Patrick GUEULLE. 

Ce livre mérite particulièrement notre attention 
car les différentes applications pratiques qu’il 
propose sont réalisées à partir d’ordinateurs de 
la gamme Sinclair : ZX 81 et Spectrum. On ap¬ 
prend ainsi que le ZX 81 est parfaitement capa¬ 
ble de se transformer en « centre serveur » d’un 
réseau télématique, que l’écouteur de n’importe 
quel combiné téléphonique peut devenir un 
« modem » à bon marché, que la télécopie est à 
la portée, ou presque, de n’importe quel hob- 
byiste, tout cela dans un livre d’une densité as¬ 
sez remarquable qui contient également de 
nombreux renseignements sur les aspects so¬ 
ciaux, moraux et juridiques des échanges de 
programmes entre amateurs. Ce livre propose 
aussi des récréations inattendues, mais qui sé¬ 
duiront l’électronicien, par exemple l’utilisation 
de la haute définition du Spectrum pour dessiner 
des circuits électroniques avec une jolie préci¬ 
sion. 



Votre ordinateur et la télématique 

Par Patrick GUEULLE 
Editeur ETSF 
Paris 1984, 128 pages 

L’informatique et la télématique sont des techni¬ 
ques complémentaires ; malgré cela une grande 
majorité de programmeurs ne sait rien de la télé¬ 
matique. Pourtant, au moment où les Minitel 
prolifèrent sur les tables de travail, il devient de 
plus en plus impardonnable de tout ignorer de 


P.G. Ce livre, qui est le treizième d’un auteur fidèle 
aux éditions STF et dont les lecteurs ont souvent 
eu l’occasion d’apprécier les contributions à 
ORDI-5, est un ouvrage tout à fait propre à dé¬ 
complexer totalement le lecteur vis-à-vis de 
l'univers gigantesque des télécommunications 
modernes. Même le lecteur informaticien qui 
n’est pas intéressé immédiatement par les réali¬ 
sations électroniques en retirera l’impression 
rassurante que les architectures de réseau peu¬ 
vent échapper à la main-mise technocratique 
pour autoriser maintes expériences conviviales 
entre amateurs astucieux. 

----, F.B. 
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Codage et décodage de messages secrets sont des exercices fort 
divertissants auxquels l’informatique individuelle peut donner une toute 
nouvelle dimension : le plus simple des ordinateurs familiaux peut 
décrypter en quelques secondes, et même sans la clef, les messages 
codés selon les règles les plus naïves (substitution de lettres). 
Seulement, la cryptographie est fort loin de n’être qu’un passe-temps 
de boys-scouts ! Ses applications militaires et diplomatiques ne sont 
plus à présenter, alors que l’industrie éprouve fréquemment le besoin 
de protéger la transmission d’informations hautement confidentielles. 

A l’heure où des moyens de déchiffrement performants sont 
potentiellement à la disposition de tout possesseur d’ordinateur 
individuel, il est plus que jamais indispensable de se monter vigilant 
quant au choix des procédés de codage que l’on peut être amené à 
utiliser... 


La « clef » du problème : 

Rigoureusement parlant (au sens statistique du 
terme), aucun codage ne peut être parfait : le 
décrypteur peut, au terme de longs tâtonne¬ 
ments, tomber « par hasard » sur la bonne clef. 
Des moyens , informatiques appropriés permet¬ 
tent de systématiser (et donc d’accélérer) les re¬ 
cherches, tandis que « l’art du décrypteur » 
consiste à orienter intuitivement les essais dans 
telle ou telle direction. 

Le travail du crypteur consiste donc à trouver un 
code appartenant à une gamme de possibilités 
aussi vaste que possible, bref à compliquer au¬ 
tant que faire se peut la tâche de son «. collè¬ 
gue ». 

La substitution de chaque lettre ou chiffre par un 
autre signe semblerait, à première vue, répondre 
à cette nécessité. Hélas, il est facile, dans n’im¬ 
porte quelle langue, de mettre en évidence des 
fréquences d’apparition différentes pour chaque 
lettre. Dès lors, pourvu que le message soit suffi- 
sament long, son décryptage n'est qu’une ques¬ 
tion de minutes (à la main) ou de secondes (sur 
machine), même si la clef n’est pas connue. 

Les techniques modernes de cryptage font 
presque toutes appel à l’informatique : un mes¬ 
sage quelconque peut facilement être repré¬ 
senté sous la forme d’une liste d’octets (en code 
ASCII ou autre), et bien des algorithmes peuvent 
être définis en vue d'y introduire une « pagaille » 
savamment organisée ! 

L’un des principes les plus répandus consiste à 
appliquer l’opérateur logique OU EXCLUSIF (X- 
OR) bit à bit entre un tronçon du message à co¬ 
der et une série de bits constituant la clef. La fi¬ 
gure 1 rappelle la table de vérité de cet opéra¬ 
teur, alors que la figure 2 montre comment la 
même opération, utilisant évidemment la même 
clef, peut servir et au cryptage, et aù décryp¬ 
tage. 


00 

0 

01 

1 

10 

1 

11 

0 


table de vérité de la fonction OU exclusif (X-OR) 


clair : 

00101101 


clef : 

10110100 


X-OR : 

10011001 

(crypté) 

clef : 

10110100 


X-OR : 

00101101 

(a clair) 


figure 2 : 

principe du cryptage-décryptage par OU exclu¬ 
sif bit à bit avec une clef. 


L’Américain SHANNON a beaucoup travaillé sur 
le sujet, et a pu dégager les données théorique¬ 
ment nécessaire à une exploitation « sérieuse » 
de la méthode. 

Différentes procédures normalisées ont pu être 
définies,, débouchant même, aux Etats-Unis, sur 
de véritables « services publics » de communica¬ 
tion cryptées ! 

IBM a ainsi développé un procédé (le DES ou 
Data Encryption Standard) utilisant une clef de 
56 bits (soit 70 millions de milliards de possibi¬ 
lités). 


Les spécialistes trouvent cependant ce codage 
un peu trop facile à percer (!) et se font fort de 
« balayer » toutes ces possibilités en une jour¬ 
née, avec un matériel approprié. On parle donc 
de passer à 128 bits, mais il a été démontré 
qu'une sécurité totale ne pouvait être garantie 
que si le nombre de bits de la clef était le même 
que celui du message. On parle alors de sys¬ 
tème inconditionnellement sûr : le « nec plus ul¬ 
tra » de la cryptographie. 


L'utilisation professionnelle d’un tel système est 
très lourde, car la communication des clés pose 
presque autant de problèmes que celle des 
messages (il faut une clef pour transmettre les 
clefs...) : on ne s’en sert donc que dans les 
« grandes occasions ». 

A l’échelon du particulier ou d’une entreprise, la 
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CRYPTOGRAPHIE 


chose est nettement plus simple : le codage 
comme le décodage pouvant être opérés per¬ 
sonnellement par les correspondants eux- 
mêmes sur leur propre ordinateur individuel, il ne 
leur reste qu’à se mettre d’accord « en tête à 
tête » sur la clef utilisée, et une sécurité quasi- 
totale sera pour ainsi dire garantie : même le 
contre-espionnage restera impuissant devant les 
messages qui seront échangés par la suite (ou 
bien nous n’avons rien compris au problème...). 


Un système de codage en « or » 


N’importe quel ordinateur individuel, même très 
simple, peut facilement accomplir les opérations 
de manipulation de caractères (ou d’octets) né¬ 
cessaires au cryptage comme au décryptage 
des messages. Seule la mise en œuvré de l'opé¬ 
rateur ou EXCLUSIF pose un petit problème, car 
le BASIC ne possède pas l’instruction corres¬ 
pondante. Il suffira toutefois d’appeler une très 
courte routine en langage machine, puisque tout 
microprocesseur digne de ce nom exécute le X- 
OR en quelques microsecondes. 


Nous avons choisi de développer cette applica¬ 
tion sur un ZX-SPECTRUM, car les caractéristi¬ 
ques de cette machine très répandue se prêtent 
bien au travail qu’elle aura à accomplir. Bien évi¬ 
demment, les principes utilisés pourront être 
transposés à pratiquement n’importe quel autre 
ordinateur. 


La figure 4 présente le logiciel de cryptage, dont 
l'essentiel tient en quelques lignes : Le message 
(composé de caractères ASCII absolument 
quelconques) est frappé « au kilomètres », 
comme en traitement de texte, la touche ENTER 
ne devant être pressée qu’à la fin, pour déclen¬ 
cher le cryptage. Celui-ci, très rapide puisque 
exécuté partiellement en langage machine, déli¬ 
vre une suite d’octets présentés en décimal et 
séparés par des virgules. Il nous a semblé qu’il 
s’agissait là de la présentation la plus commode 
pour une transmission et une saisie ultérieure 
sans erreurs. 


i 

10 
r '?'* 
20 

ENTER 

30 

40 

1 

5 0 
60 
•70 
00 

rn e t r a 
es me 
coda 

3 L o n 

ceLl 
c o n t e 
e R5C 

urr 1 _ 
03 


REM **** CRYPTAGE *** 
CLi : PR INT "MESSAGE 


PRINT PRINT 
q U 'a l. a fin) 
INRIJT m $ 

DRTR 62,0,6,0,168 


a code 
(ne presser 


79,6,0,20 


FOR f =32600 TO 3360S 
R E H D a : P* O K E f , a 
N EXT F 

L ET c$ = "Jî suis la cl 
n t de coder ou de dec 
s s a f e s : pour la sec ur 
ge.,il est intéressant 
gueur soit au moins e 
e du texte a coder.Jt 
r,ir n 'importe quel ca 
II disponible sur le 


e r per 
Oder i 
i te du 
q u e m 
gale a 
peux 
racter 

SPECTP 


LET C$=C$+Cî 
IF LEN m È > LEN 


Ci THEN GO TO 


86 
SG 
90 CL. S 

100 FOR f-1 TO LEN m# 

110 PDKE 3S601,CODE m * < f > 
1S0 POKC 33000,CODE C$(f) 
130 PRINT USR 32600; " , " ; 
14-0 N EXT r 

150 REM Copyright 1984 


figure 4 : 

le logiciel de cryptage 


La figure 3 décrit la routine qui, écrite en assem¬ 
bleur Z 80, relie l’instruction X-OR à son 
contexte BASIC : les deux premières lignes vien¬ 
nent positionner les deux octets à traiter (mes¬ 
sage et clef) dans les registres A et B. Le résul¬ 
tat de X-OR étant disponible dans A, il faut le 
transférer dans C pour qu’il puisse rejoindre le 
BASIC dans la variable « de liaison » USR. 
Comme nous ne traitons ici qu’un octet à la fois, 
il faut bien sûr aussi mettre à zéro l’octet de 
poids fort de USR, c’est à dire le registre B. 


Une variante pourrait consister à passer en 
hexadécimal et à supprimer les virgules : le 
« texte » serait alors plus compact, mais aussi 
beaucoup plus délicat à traiter, sans parler de la 
rapidité de codage qui en pâtirait nettement. 

Il n’est pas possible d’utiliser les caractères cor¬ 
respondant à ces octets, car les 256 possibilités 
peuvent se présenter, et certaines d’entre elles 
ne sont pas Imprimables (codes de contrôle de 


32600 

LDA, N 

62 

0 

32602 

LDB, N 

6 

0 

32604 

XOR B 

168 


32605 

LDC,A 

79 


32606 

LDB, 0 

6 

0 

32608 

RE T 

201 



chargement octet à traiter 
chargement de la clef 
OU exclusif 

transfert dans C (pour USR) 
poids fort de USR à zéro 
retour au BASIC 


figure 3 : 

routine en langage machine mettant le OU ex¬ 
clusif à la disposition du BASIC : rappelons 
qu’au retour, la variable USR contient une valeur 
numérique reflétant le contenu des registres B 
(poids fort) et C (poids faible) du Z80. 


la machine). Bien entendu, chacun substituera 
sa propre clef au contenu de la ligne 80. On ap¬ 
préciera ici l’un des atouts des machines SIN¬ 
CLAIR, à savoir la longueur illimitée des chaînes 
(dans la mesure, tout de même, de la capacité 
mémoire disponible !). 
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Ces deux programmes travaillent entièrement 
sur l’écran, la machine proposant automatique¬ 
ment un SCROLL dès que celui-ci est plein. Si 
on dispose d’une imprimante, on aura toutefois 
intérêt à remplacer les PRINT par des LPRINT, 
afin d’éviter de pénibles transcriptions. 


Eh bien cryptez maintenant ! 

L’intérêt d'un système performant de cryptage 
n’apparaît qu’en cas de transmission des mes¬ 
sages traités. 


On aura donc tout intérêt à prévoir une clef au 
moins aussi longue que le plus long des mes¬ 
sages que l’on estimera avoir besoin de trans¬ 
mettre. A défaut, la machine utilisera plusieurs 
fois cette même clef dans tout message trop 
long. On ne pourra plus alors parler de sécurité 
inconditionnelle, mais le codage restera néan¬ 
moins excellent ! 

Notons bien que de l’espace mémoire est gas¬ 
pillé au profit d’une simplification du pro¬ 
gramme : la chaîne C$ est présente en zone pro¬ 
gramme et au moins deux fois en zone variables. 
On pourrait améliorer le « rendement » du logi¬ 
ciel si des messages très longs (plusieurs pages 
dactylographiées) devaient être traités. Mais 
alors, il faudrait envisager aussi des procédés de 
transmission différents (enregistrement sur cas¬ 
sette de la suite d’octets, et envoi ou diffusion 
de ce support). 

Le logiciel de décryptage de la figure 5 est une 
variante du précédent, en ce sens que l’opéra¬ 
teur doit lui soumettre les octets codés les uns à 
la suite des autres, séparés par ENTER, puis 
presser encore une fois ENTER pour déclencher 
le décryptage, en fin de saisie. L’écran affiche 
toujours le dernier octet pris en compte, au cas 
où l’opérateur viendrait à « perdre le fil » de sa 
liste. Le traitement opéré sur les octets est le 
même qu’au cryptage, à la seule différence que 
l’instruction CHR$ est utilisée sur USR pour un 
affichage direct du message en clair. 


•i 

s 

a.® 

•a e ch 
15 

ENTE 

20 

TO 50 


30 

35 

4-0 


1 


50 
60 
70 
60 

m e t t a 
es me 
coda 
a i. o n 
c e i. i. 

c o n t e 
e fiSC 
ur-rj _ 

B--' 

0 6 
33 


REM **** DECRYPTAGE * ■* * * 
let m $ = "" 

C!_S i PRINT "CODES du IliîïS 
i ( f r e ? " 

PRINT PRINT "(sépares par 

R ? " 

IN PUT K $ : IF K. $ = " " THEN GO 

'LET »t=Hlt+CHRt UAL K $ 

PRIAT fiT 10, O; H, - " 

G O T O 20 

DRT R S£,0,0,0,160,79,6,0,£0 

FOR f =32600 TO 3260S 
R E fi D a: POKE f,3 
N EXT f 

LET ct = ".Je suis La clef per 
rit de coder ou de décoder L 
situes: Pour La sécurité du 
ae.ii. est intéressant que rn 
g u é u r soit au moins e g a L e a 
e du texte a c o d e r . J e peux 
n i r n ' i rn p o r t e quel caracter 
Il dispo nib L e s u r Le SPECTR 


let ct=c»+ct 
IF LEN m $ > L E N 


Ci THEN GO TO 


30 

CL S 




100 

F O R f 

= 1 TO 

LEN 

m $ 

110 

POKE 

32601 

, CODE 

iïi 4 ( f 

120 

PÜKE 

32603 

, CODE 

Ct(l 

130 

P R X NT 

CHR $ 

USR 

3 a s o o 

14-0 

N EXT 

F 



150 

REM C 

o p y r i 

g h t © 

1964 

figure 5 






le logiciel de décryptage 


Les listes d’ootets obtenues sur l’imprimante de 
l’ordinateur « codeur » peuvent sans problème 
être directement mises à la poste : même inter¬ 
ceptées, elles ne risquent nullement de se trou¬ 
ver décodées, à moins que la clef n’ait été ébrui¬ 
tée ! 

Pour plus de sûreté, on pourra utiliser comme 
clef le texte d’une page d’un livre choisi dans le 
plus grand secret, et changer périodiquement 
cette clef en convenant (en code) du numéro 
d’une nouvelle page. On se gardera bien de faire 
composer au SPECTRUM une clef « aléatoire », 
car la fonction RND de son BASIC n’a d’aléa¬ 
toire que le nom... 
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figure 6 : 

Un exemple de résultat obtenu au moyen des 
deux logiciels proposés. La liste de codes chif¬ 
frés peut bien sûr être transmise par n’importe 
quel moyen usuel. 

Une liste d’octets analogue à celle de la figure 6 
peut également être transmise par tout autre 
procédé usuel : par télex, télécopie, bélinogra- 
phe, mais aussi par « lecture » au téléphone ou 
par radio. Les habitués des ondes courtes ont 
certainement tous entendus, un jour, une voix 
récitant posément de longues listes de nombres, 
généralement répétés deux fois chacun. Ga¬ 
geons qu’ils se doutent maintenant un peu de ce 
dont il s’agit, tout en ne se faisant aucune illu¬ 
sion quant à la possibilité de comprendre un jour 
quelque chose de précis, même avec l’aide de 
leur SPECTRUM ! 

Références : 

Nos lecteurs intéressés par l’aspect général des 
questions de cryptographie pourront consulter 
avec intérêt l’article de Louis GUILLOU (numéro 
44 hors série de SCIENCE ET AVENIR) : Une 
nouvelle science, la garantique, ainsi que par 
l’article de notre collaborateur (et maintenant 
ami) Xavier LINANT de BELLEFONDS : « le 
Code secret est sur la place publique » (L’Ordi¬ 
nateur Individuel, décembre 1981) 

_ Patrick GUEULLE 
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L es Plusss 


Spectrum Plus, Basic étendu, Superbasic, Basicode...le fidèle des 
ordinateurs Sinclair est depuis quelques temps interpellé par un certain 
nombre de « plus ». Comment s’y reconnaître dans ces plus sans 
« flipper » ? ORDI-5 vous propose de vous aider à vous y retrouver à 
l’aide de quelques mises au point condensées. 


Specîmm « Plus », 
où est le Plus ? 


nnn nnnnn nnnnnnnn 



1 

ooooooc 

■3000000 


■ 

MRfflM 

lOOOOOO 


■ 




■ 

O" 30000 

00003 0 


■ 

ooooocz 

30000 




éléments revenant en fait à une seule question : 
est-ce que le supplément de prix est justifié par 
une beauté et une facilité accrues ? Il faut en ef¬ 
fet constater avec regret que le Spectrum 
« plus » ne s’est pas conformé à la loi actuelle du 
monde informatique qui est que chaque nouvel; 
appareil apporte un « + » de possibilité pour un 
« - » de prix. Encore que cette règle connaisse 
des exceptions lorsque la nouveauté ne porte 
que sur la présentation d’un produit, ce qui est 
le cas ici. 


Le noir le va si bien 


Sans tambour ni trompettes 

Dans un certain nombre de points de vente, le 
Spectrum « plus » a pris le relai du Spectrum ces 
dernières semaines. Il s'agit d’un matériel qui 
s'est substitué au précédent avec une grande 
rapidité et sans réelle préparation publicitaire, 
ce qui fait exceptions aux méthodes de la mai¬ 
son Sinclair qui nous a habitués à préparer ses 
effets longtemps à l’avance et à tenir difficile¬ 
ment ses délais de commercialisation. Cette 
nouvelle machine marche très bien, présentons- 
la. 


Pour une fois la chose est si simple qu'on peut 
se permettre de commencer par la conclusion : 
le Spectrum « plus » est exactement la même 
machine que le Spectrum avec un clavier diffé¬ 
rent. Il ne s'agit pas d'une simple compatibilité 
mais d’une identité parfaite en dessous de l’épi¬ 
derme : mêmes programmes, même microdrive, 
même cartouche, mêmes interfaces, mêmes ca¬ 
ractéristiques, etc. 

Il en résulte qu’il y a trois choses à comparer : 
facilité de manipulation, beauté et prix ; ces trois 


Parlons d’abord de la beauté. C’est vrai, le 
Spectrum « plus » a de la gueule. Il rappelle les 
lignes pures et remarquablement sobres du QL 
avec un rectangle aux proportions plus banales 
(plus court et plus profond). Cette similitude est 
très forte pour les touches qui se présentent 
comme des secteurs de cercle, légèrement 
concaves, placés sur des plots carrés. Elles sont 
implantées comme des touches de machine à 
écrire, pour ce qui est de la disposition et de 
l’espacement. 
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LES PLUSSS 


L’ensemble est donc plus important que le 
Spectrum : les amoureux de la miniaturisation 
Sinclair, qui permet de placer son appareil, dans 
les périodes de repos, debout entre deux livres, 
y perdront cela. De plus, le nouveau Spectrum 
perd la cohérence de « design » avec son princi¬ 
pal périphérique, le microdrive, dont le dessin a 
été conçu pour rappeler de près les lignes de 
l’ancien Spectrum (courbes générales, relève¬ 
ment de la partie postérieure, etc.). Peut-être le 
microdrive connaitra-t-il bientôt une caisse légè¬ 
rement modifiée. 


tion notoire par rapport au clavier « mou » : nous 
connaissons certains jeunes capables de faire 
courir leurs doigts sur le clavier « organique » en 
caoutchouc avec une virtuosité confondante et 
qui affirment que la matière élastique permet 
aux doigts de rebondir à toute vitesse. Sur ce 
point ceux qui passeront de l’ancien Spectrum 
au nouveau éprouveront quelques difficultés 
d’adaptation qui ne sont évidemment pas insur¬ 
montables, mais qui persisteront plusieurs 
heures. 


Cette beauté reste malgré tout un peu superfi¬ 
cielle, car lorsqu'on se penche sur le clavier on 
s’aperçoit que les inscriptions sur les touches 
forment un ensemble un peu confus qui fatigue 
rapidement l’oeil : en effet les mots-clés sont 
tous situés au-dessus des touches, et non plus 
également sur et en-dessous, ce qui était une 
caractéristique du clavier précédent. Il s'ensuit 
une certaine lassitude visuelle pour le débutant 
qui n’a pas encore acquis les automatismes ma¬ 
nuels pour sa machine. 


Vrai clavier ? voire... 


La transition est facile avec l'appréciation de la 
facilité puisque la principale incommodité d’em¬ 
ploi résulte précisément du choix de placer l’en¬ 
semble des instructions en-haut de la touche : 
ceci a conduit à abaisser le centre de contact un 
peu vers le bas ; de ce fait on accroche facile¬ 
ment les touches Immédiatement inférieures. 
C’est là la grande différence avec le « feel » du 
clavier du QL, lequel possède une ergonomie 
professionnelle. La frappe exige donc un certain 
doigté qui vient sans doute avec l’expérience, 
mais qui ne permet pas d’espérer une accéléra- 


Un défaut plus marqué apparait vite : les tou¬ 
ches du « plus » ne sont pas très bien assujetties 
et c’est donc un ordinateur qu’il faut donc éviter 
de chahuter, par exemple en le transportant 
dans un cartable sans précautions. 


Notons une supériorité réelle : certaines combi¬ 
naisons de touches acrobatiques sur le Spec¬ 
trum précédent pour obtenir des mots-clés spé¬ 
ciaux sont supprimées par l’existence de 
touches de shiftage perfectionnées d’une part, 
et d'autre part, les différents curseurs sont 
mieux positionnnés sur le clavier (il entourent la 
barre d'espacement, elle-même nouveauté Inté¬ 
ressante). 


Le Spectrum, ainsi remis au goût du jour va 
poursuivre sa brillante carrière ; tout ce qu’il faut 
souhaiter, c’est que ce nouvel habillage qui le 
rend 20 % plus cher ne réduise pas trop le fossé 
qui sépare ce matériel d’une certaine concur¬ 
rence. A cette réserve près, le Spectrum « plus » 
nous apparait comme une machine assez bien 
placée sur le marché sur l’ensemble des critères 
commerciaux. 


A. LOUBEYRE. 


L e Basic étendu\ 
spectrum + 


Qu’est-ce que le Basic étendu ? Ceci ne cores- 
pond nullement à un standard comme l’est Basi- 
code ou comme pourrait le devenir le Superba¬ 
se du QL. Il s'agit d'une réalité concrète qui 
concerne chaque appareil : en. ce sens on peut 
dire que le Basic du ZX 81 est étendu par rap¬ 
port à celui du ZX 80 qui ne connaissait que les 
variables numériques entières et par conséquent 
n’avait pas la virgule flottante, que le Basic du 
Spectrum est étendu par rapport à celui du ZX 


81, notamment pour la gestion de tous les attri¬ 
buts d’affichage ainsi que la haute définition 
graphique, etc. 

Cependant, pour le Spectrum particulièrement, 
la notion de Basic étendu est plus spécifique. Ici, 
le Basic étendu c’est le Basic de la version stan¬ 
dard, déjà fort puissant, plus un certain nombre 
d’instructions qui élargissent considérablement 
les possibilités du sytème. 
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Un Basic étendu contient donc davantage d'ins¬ 
tructions qu’un Basic restreint : il faudra donc 
que l’interpréteur implanté dans l’appareil soit 
en mesure de reconnaître davantage de mots- 
clés ; aussi est-il nécessaire, bien qu’on puisse 
étendre le Basic d'une façon exclusivement logi¬ 
cielle, si on souhaite que cette extension soit 
stable, qu'il y ait un supplément de mémoire 
morte. Dans le Spectrum, ce supplément ne se 
trouve pas dans l’appareil lui-même, mais dans 
l’extension ZX 1 qui vient s’accoler à lui. 


La deuxième catégorie de commandes généra¬ 
lise, en les élargissant considérablement, les 
commandes, présentes dans le Spectrum de 
Base, qui gèrent les voies et les canaux (OPEN, 
CLOSE). 

Une troisième classe de commandes est entière¬ 
ment nouvelle (ERASE, CLEAR #, CLS #, FOR¬ 
MAT) ; ces commandes ont un objet très 
précis : par exemple formatage ou effacement 
d'une microcartouche. 



îendu 


L'extension de ROM que le ZX reçoit ainsi est de 
l’ordre de 8k (pour 16k de ROM de base). L’ad¬ 
dition logicielle n'étant pas adjointe à la ROM de 
base, il s’ensuit que, confronté à une instruction 
nouvelle appartenant à la partie étendue du Ba¬ 
sic, le système devra passer d'une ROM à l'au¬ 
tre sur un signal. 


Le Basic étendu introduit trois nouvelles familles 
de commandes, moins nombreuses et plus limi¬ 
tées dans leur objet que celle du Basic restreint. 


Les plus importantes sont destinées à gérer de 
nouveaux périphériques ; ces commandes cor¬ 
respondent à celles qui gèrent les fichiers sur 
cassette : LOAD, SAVE, MERGE, VERIFY, etc. 

L'extension consiste à ajouter une étoile (pour 
signifier que l’ordre sera interprété par la nou¬ 
velle ROM) et un indicatif de fichier, cet indicatif 
se composant d'une précision relative au. péri¬ 
phérique adressé (microdrive, réseau local, sor¬ 
tie RS 232, etc.) et d’un nom de fichier ; cet indi¬ 
catif général, assez long, est rendu nécessaire 
par la multiplication des périphériques accessi¬ 
bles comme par l’augementation radicale des 
données stockables sur un seul support (une mi¬ 
crocartouche fait près de 100k de mémoire de 
masse). 


Enfin il faut aussi parler d’une quatrième catégo¬ 
rie de commandes entièrement ouvertes puis¬ 
que leur définition est à la discrétion de l’utilisa¬ 
teur : le Basic étendu permet en effet, par un 
certain nombre d’astuces, de créer ses propres 
« macro-instructions » ( par exemple un ordre 
CLS L,C qui effacerait sur l’écran une simple 
« fenêtre »). Les techniques à connaître, malgré 
leur sophistication, sont faciles à assimiler à 
condition de suivre pas à pas les procédures re¬ 
commandées que l’on trouve dans certains ma¬ 
nuels, par exemple le « Périphérie du Système 
Spectrum », des éditions PSI, qui est à notre 
sens, l'ouvrage qui couvre le mieux, d’une façon 
à la fois théorique et pratique, l’ensemble des 
questions qui ont trait au Basic étendu du Spec¬ 
trum. 


Il existe également des cassettes pour se fami¬ 
liariser avec la pratique du Basic étendu, mais 
elles ne dispensent pas l’utilisateur d’un effort 
personnel de compréhension. 


Freddie BLIN 
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Le Basicode 
ou l'ordinateur 
polyglotte 



c 



Basicode et Basicode Plus : Voici deux cas¬ 
settes vraiment pas comme les autres ! En fait, 
chacune d’elles est beaucoup plus qu’un simple 
logiciel : avec le manuel d’accompagnement, il 
s'agit d’un véritable « nécessaire » (ou « kit ») 
permettant d’adapter un nouveau langage à une 
vingtaine d’ordinateurs comptant parmi les plus 
répandus. Rassurez-vous, il ne s’agit pas d’un 
langage aussi spécial que le FORTH, le FOR¬ 
TRAN, ou le PASCAL, mais tout simplement 
d’un BASIC un peu particulier présentant l’avan¬ 
tage extraordinaire d’être compatible avec vir¬ 
tuellement n'importe quel, ordinateur, et ce jus¬ 
qu’au niveau des cassettes ! ■ 

Ecrivez un programme en langage BASICODE 
sur un SPECTRUM ou un APPLE, sauvez le sur 
cassette, et rechargez le direçtementsur un 
ZX 81 ou un ORIC : ça marche II! tout cela sem¬ 
ble trop beau pour être vrai : ces « kits » doivent 
coûter très cher et regorger de protections anti¬ 
pirates... Eh bien même pas ! Un kit revient en¬ 
tre 50 et 100 F, et la copie des programmes 
comme des explications est autorisée, pourvu 
que ce ne soit pas dans un but commercial : on 
croit rêver !' 


Un peu d’histoire 

En 1978, les producteurs de l'émission HOB- 
BYSCOOP diffusée par la station néerlandaise 
NOS F1ILVERSUM décident de transmettre sur 
leur antenne des programmes d’ordinateur : il 
suffit en effet pour cela de lire une cassette infor¬ 
matique au même titre qu’un enregistrement so¬ 
nore normal. Seulement, les standards d’enre¬ 
gistrement diffèrent fortement d'un ordinateur à 
un autre (même au sein d’une même marque), et 
les BASICs utilisés présentent de nombreuses 
incompatibilités. Il est donc diffusé chaque se¬ 
maine, un programme destiné à une machine 
bien précise, choisie parmi les quatre les plus ré¬ 
pandues aux Pays-Bas. 


Un programme par mois, c’est bien peu surtout 
lorsque le très court temps d’antenne disponible 
(quelques minutes) ne permet aux ordinateurs 
les plus lents que la transmission de logiciels ri¬ 
diculement courts. 

C’est alors qu’un radio-amateur nommé Klaas 
Robers propose une idée révolutionnaire : 
l’abandon pur et simple du BASIC d’origine des 
ordinateurs au profit d’une variante composée 
uniquement des instructions acceptées par 
toutes les machines. Dans cet « espéranto » des 
ordinateurs, une routine machine propre à cha¬ 
que type d’ordinateur permettrait également la 
sauvegarde sur cassette et le rechargement se¬ 
lon un « format » invariable d’une machine à 
l’autre, parachevant du même coup la compati¬ 
bilité définie sur le plan des instructions. Une 
équipe de bénévoles se met alors au travail, et 
produit le BASICODE, au prix de très gros ef¬ 
forts. 

Les premières diffusions de programmes BASI¬ 
CODE montrent bien que les restrictions impo¬ 
sées en matière d’instructions sont trop sé¬ 
vères : on ne peut même pas toujours effacer 
l’écran ! Retour au clavier donc pour ia dynami¬ 
que équipe de programmeurs, qui achève début 
1983 une version améliorée, le BASICODE 2. 
Depuis, la radiodiffusion néerlandaise diffuse 
chaque semaine des programmes pouvant être 
chargés sur la plupart des ordinateurs d’ama¬ 
teur. 

Pour ce faire, il faut charger un LOGICIEL 
ADAPTATEUR destiné à « enseigner » le BASI¬ 
CODE à chaque machine particulière. La plupart 
du temps, d’aillèurs, ce logiciel (ou un second) 
permet également l’écriture de programmes BA¬ 
SICODE, qui peuvent dès lors être diffusés au¬ 
près d’autres utilisateurs de ce langage, quelle 
que soit la machine dont ils sont équipés. De¬ 
puis quelques temps, la radiodiffusion néerlan¬ 
daise NOS s’efforce de promouvoir le BASI¬ 
CODE en tant que standard international 
d’échanges de logiciels, consciente qu’elle est 
de l’enjeu culturel de l’opération. 


30-ORDI-S n° 11 mars 1985 









On imagine en effet l’intérêt du développement 
massif de « réseaux » d'amateurs, quant aux 
progrès de l’informatique individuelle. 

Des stations de radio' du monde entier se sont 
donc associées au phénomène BASICODE et 
diffusent régulièrement des programmes 
conformes à ce standard, BBC en tête. 

En France, BASICODE n’a pratiquement pas 
fait parler de lui : nous en avons découvert l’exis¬ 
tence par pur hasard. Trois mois de prises de 
contact avec l’étranger ont été nécessaires à 
l’auteur de ces lignes pour obtenir toutes les in¬ 
formations nécessaires, et il entend bien en faire 
profiter autant d’amateurs qu’il le pourra, par 
tous les moyens possibles. 


Où est le plus ? 

Outre les routines machine d’enregistrement- 
lecture de cassettes (partie la plus complexe 
d’un logiciel adaptateur), l’implantation de BA¬ 
SICODE sur un ordinateur donné s’effectue en 
deux étapes : 

— chargement d’une douzaine de « routines per¬ 
sonnalisées », destinées à reconstituer les ins¬ 


truction interdites par la « syntaxe » de BASI¬ 
CODE, qui n’admet que : les quatre opérations, 
la puissance, et les six signes d’égalité et inéga¬ 
lité. 

Ces routines doivent être écrites spécialement 
pour toute machine sur laquelle on souhaite im¬ 
plémenter BASICODE, mais ce travail est à la 
portée de tout utilisateur connaissant bien son 
ordinateur. Il n’en va pas de même de l’écriture 
des routines cassette, qui exige de solides com¬ 
pétences en langage machine. 

- chargement d’un programme BASICODE, re¬ 
vêtant la forme de lignes BASIC de rang supé¬ 
rieur à 1000, et totalement indépendantes de la 
machine (à quelques exceptions près). 

Cette partie « universelle » du programme appel¬ 
lera aussi souvent que nécessaire les routines 
personnalisées, résidant avant la ligne 1000. On 
fera, par exemple, GOSUB 100 pour effacer 
l’écran, au lieu de CLS. 

La figure 1 résume, mieux qu’un long discours, 
ces conventions fondamentales sous la forme 
d’un listing commenté : chaque routine normali¬ 
sée BASICODE commence obligatoirement à la 
ligne qui en indique le titre, entre des astéris¬ 
ques. 


1 REM tttt PREPARATIFS %■%%% 

2 REM 

3 rem Les lignes 1 a 1@@ Peuvent etre utilisées Pour initialiser la 
machi ne ( cou. 1 eu.rs d' écran, P ar exemP 1 e i 

4 REM Certains ordinateurs exigent une déclaration Préalable de la 
Place necessaire aux chainés de caractères 1 

5 REM Dans un tel cas., on Placera ici un RUN 1800.. renvoyant a la 1. 
iQfic- £0 qui se chargera de cette déclaration a Partir de la variable fl 

6 REM 

7 REM 

20 REM tt» DECLARATION CHAINES **** 

21 REM Pour certa.ines Machines seulement 

22 REM Sinon, GOTO première ligne après 1880 (1001 ou 1810) 

23 REM 

24 REM 

100 REM #*** EFFACEMENT ECRAN tttt 

101 REM 

102 REM L'écran est efface, et la Position d'écriture (curseurJ est P 
\haut et a 9auche de l'écran 

103 REM 

104 REM 

110 REM tttt POSITIONNEMENT CURSEUR tttt 

111 REM 

112 REM La Position d'écriture est amenee au 


oordonnées H0 (HOrizon 


taie 

> et 

VE (VErticale) d' 

un écran comportant 

40 a 

?.ract 

0 ‘S • 

la colonne de 9 au cl 

113 

REM 

H0=0 correspond a 

114 

REM 

VE=0 correspond a 

la li9ne du haut 

115 

REM 



116 

REM 



120 

REM 

:m* RECHERCHE CU 

RSEUR tttt 

121 

REM 



122 

REM 

Cette routine donne aux variables HU 

Pondant a 

, la Position d'ec 

riture P resente 

123 

REM 



124 

REM 



200 

REM 

*%%% LECTURE CLRV 

1ER tttt: 

201 

REM 

Lit le clavier 'au vol' et Place dan: 

ere < 

zo rre 

■sPondant a, la tou 

che eventuellement ■ 

202 

REM 

Si aucune touche 

n'est enfonces.« IN$ 


chaine vide, 


ar cette routine n'attend Pas- 

203 REM 

204 REM 
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C f) WW 

mm 

in mm 

■—\ 

_) 

.*.%%% V.V 

—J 

mm 

co WM 


-1 Place dans I 


'lui le nécessitent, destruction des variable 


mm 210 REM *:m RTTENTE TnilCHE tttt 
gggg 211 REM 

"x*Xv.t < -l‘- REM. Attend 'lue l'on Presse une touche du cla’<**iep. 

WvXÇ N* le caractère correspondant 
mm 213 REM 
214 rem 

250 REM SIGNRL SONORE 

251 REM 

Emission d' un court siSnal sonore. (Pour les machines lui le p 

WM 253 REM 
m$& 254 REM 

mm 260 REM *m NOMBRE ALEATOIRE **** 

261 REM 

mm 262 REM Place dans la variable RV un nombre >=pi <1 
•ïxèox 263 REM " 

mffî 264 REM 

mm 270 REM :m* MEMOIRE LIBRE %%%.% 

27 1 rem 

WM e ~' ^ Place dans la variable FR le nombre d'octets encore,disPonibl 

mm 273 REM Sur les machines 
v# s devenues i nut i 1 es 
mm 274 REM 
275 rem 

mm 300 REM %%%% CHAINES NUMERIQUES **** 
mm 301 REM 

WM 292 REM Construit une chai ne SR* a Partir de la valeur numérique SR 
REM sans espace au début nu a la fin -- - ■ 

304 REM " " 

mm 305 rem 

mm 310 REM **** FORMHTTHGE :*:*#:* 

i mm si 1 rem 

S' ^ c '!! £trui t" ' u,l ' ie ch f f ne 3R ® lonsue de CT caractères dont CH aPre 
s _,ï? décimal, a Partir de la valeur numérique sr 

mm ^ g™ 2n cas d'impossibilité, SR* contiendra CT "astérisque*. 
mm 2 \t oR p - ut 6tre arrondi si necessaire 

mm 316 REM 

mm 350 REM **** IMPRESSION PAPIER **** 
mm 351 REM 

$$m st 5 pa= E rloce Chailie SR$ est tr -' T, -- r,,i - ç a !■'imprimante, mais la liane Ve 
mm- 353 RfA 0 n Peut encore lui ajouter des caractères 

mm 355 rem 

iïSS 360 REM :*:*:*:* FIN IMPRESSI0N **** 

%££ 361 REM 

lllourVÏÏ U li9ïte diri9ee sur 1.' imprimante et declenche un ret 

363 REM 
m& 364 REM 

mm 365 REM FIN DES ROUTINES PERSONNALISEES 
m® 393 REM #**********************;| a j: ÏS!ï; | : ^ 
mm 1000 LET A=( chai nés): GO TO 20: REM nom du Programme 
1001 REM LE PROGRAMME BASICODE-2 . 

^ 002 REM Peut occuper les lianes ifirfi 3 rqcici 
* REM IL EST 'INDEPENDANT DU TYPE"DE‘MACHINE... 

gg;;. 1004 REM Certaines machines acceptent des numéros de lianes Jusqu'à 32 

11$: 1006 rIm LeS der ' niere -- * 1 -'ues sont reservees aux REM et DATA 

mi i 00 '! 7 REM NOS BASICODE 2 

■i::;:;:;: 1008 REM COPYRIGHT NOS HILVERSUM 


Les Sinclair font bande à part 

Le BASICODE a été développé avant même que 
le ZX 81 (et a fortiori le SPECTRUM) soit dispo¬ 
nible. Comme ces machines sont munies d'un 
BASIC plutôt inhabituel, la compatibilité avec le 
BASICODE est fort problématique. La BBC a 
mis au point une version « améliorée », le BASI¬ 
CODE 2+, facilitant le chargement de pro¬ 
grammes BASICODE sur le SPECTRUM, mais 


pas l’écriture de BASICODE par cette machine. 
Le ZX 81 est carrément ignoré ! Chose curieuse, 
c’est un Hollandais et non un Anglais qui a re¬ 
levé le défi, en mettant au point un logiciel com¬ 
plet pour le SPECTRUM (lecture et écriture), et 
un programme pour le ZX 81 (lecture seule¬ 
ment). Ces logiciels figurent sur la cassette 
« NOS-BASICODE 2 » vendue par correspon¬ 
dance. 

Nous avons expérimenté le BASICODE sur les 
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machines suivantes, tant en écriture qu’en lec¬ 
ture : DRAGON 32, SPECTRUM, ZX 81, ORIC 1 
(dans l’ordre de nos essais). 

Le chargement et l’exécution de programmes 
BASiCODE obtenus par radio ou reçus sur cas¬ 
settes est un plaisir sur la première et la dernière 
machines, mais un calvaire sur les deux SIN¬ 
CLAIR : c’est triste à dire, mais les difficultés 
sont telles que nous conseillons aux « Sinclai- 
ristes » de se familiariser avec BASICODE (en 
lecture du moins)... sur la machine d’un ami 
ayant choisi une autre marque ! 

Les problèmes proviennent essentiellement du 
fait que les ordinateurs SINCLAIR n’acceptent 
que des noms de variables de chaîne ou de bou¬ 
cle d'une lettre au maximum : à la limite, les pro¬ 
grammes BASICODE utilisant plus de 26 varia¬ 
bles de chaîne ne tourneront jamais sur 
SINCLAIR. Les instructions de découpage de 
chaînes (TO à la place de LEFT$, MID$ et 
RIGHT$) posent aussi de gros problèmes. 

Les choses ne vont guère mieux avec le logiciel 
adaptateur BASICODE 2+ diffusé par la BBC 
(pourtant écrit par le fameux Dr lan Logan !). 

Par contre, et nous sommes ravis de l’écrire ici, 
il est extrêmement facile d’écrire des pro¬ 
grammes BASICODE sur un SPECTRUM : il suf¬ 
fit de « boycotter » les instructions « à pro¬ 
blèmes », soit : et, bien sûr, de respecter les 
conventions générales BASICODE, que nous ne 
pouvons qu’effleurer ici, mais qui sont détaillées 
dans les manuels accompagnant lés cassettes 
adaptatrices. 

Un programme écrit sur un SPECTRUM et enre¬ 
gistré en BASICODE sur une cassette peut bien 
sûr être rechargé sur un SPECTRUM (48 K seu¬ 
lement), sur un ZX 81 (les minuscules devien¬ 
dront des.majuscules), ou sur tout ordinateur 
« comprenant » le BASICODE : nous n’avons 
rencontré aucun problème avec le DRAGON 32 
oul’ORICI. 

Reste l’écriture de BASICODE avec un ZX 81 : 
Néerlandais et Britanniques s’accordent pour la 
qualifier d’impossible. Directement, peut-être, 
mais rien n’empêche de transiter par un SPEC¬ 
TRUM, emprunté pour la circonstance, grâce au 
logiciel « ZX TRANS » présenté dans notre n° 9 ! 
Seule difficulté, ZX TRANS utilise systématique¬ 
ment des lettres minuscules, interdites dans les 
variables BASICODE : il faudra donc les « capi¬ 
taliser » avant toute sauvegarde en format BASI¬ 
CODE. (*) 


Quelques « tuyaux » : 

Vous pouvez vous procurer la cassette « BASI¬ 
CODE 2 » et son manuel (bilingue néerlandais- 
anglais) auprès de : 

BASICODE 

Administrative Algemeen Secretariaat 
NOS 

PO Box 10 

1200 JB HILVERSUM 

Pays-Bas 

Lors de la rédaction de cet article, le prix est 
de 33 florins frais de port compris, à régler obli¬ 
gatoirement par mandat postal international 
(bien préciser votre adresse et la nature de votre 
commande sur le talon-correspondance). 


Vous recevrez sous quelques semaines un épais 
manuel et une cassette regroupant les pro¬ 
grammes adaptateurs pour : 

Apple II et II e 
BBC 

Colour Genie 

Commodore 3000, 4000, 8000, et 64 
VIC 20 

Exidy Sorcerer 
Microprofessor 
New Brain 
Philips P 2000 

Sharp MZ 80A, MZ 80B, MZ 80K 
Spectrum 48 K 
ZX 81 16 K 

TRS 80 et Vidéo-Génie ou compatibles, 
et, en plus, 21 logiciels déjà transcrits en format 
BASICODE ! Tous les vendredis à 20 h 10 envi¬ 
ron, nos lecteurs du Nord de la France pourront 
régler leur radiocassette sur 1008 kHz en PO : 
par bonnç propagation, ils enregistreront ainsi 
un ou deux programmes BASICODE diffusés 
dans le cadre de HOBBYSCOOP (horaires et 
fréquences d’hiver). 

Rappelons cependant que leur chargement sur 
SPECTRUM n’est pas une mice affaire ! 

La cassette britannique « THE CHIP SHOP 
BASICODE 2 PLUS » n’est vendue par corres¬ 
pondance qu’aux sujets de sa Gracieuse Ma¬ 
jesté. Un ami anglais pourra certainement vous 
servir d’intermédiaire pour cet achat (prix de 
vente, avec manuel : 3,95 livres) auprès de : 
BROADCASTING SUPPORT SERVICES 
2 Cater Road 
BRISTOL BS13 7TW 
Grande-Bretagne 

Notez ceppndant que la cassette néerlandaise 
permet de charger sur votre SPECTRUM les 
programmes émis par lâ BBC sur 1053 et 
1089 kHz les samedis et dimanches à 5 h 55 du 
matin (heure anglaise) pour la grille de pro¬ 
grammes d’hiver de Radio 1. Beaucoup de ces 
programmes pouvant avoir été écrits en vue 
d’une compatibilité accrue avec le SPECTRUM, 
attendez-vous à de bonnes surprises si vous ha¬ 
bitez le nord-ouest de la France ! La cassette re¬ 
groupe les logiciels adaptateurs pour : 

Apple II et Ile 
BBC 

ELECTRON 

Commodore 3000, 4000, 8000, 64 
VIC 20 

DRAGON 32 et 64 
MSX 

ORIC 1 et ATMOS 
SHARP MZ80A et K 
SPECTRUM 48 K 
TRS 80 et Vidéogénie, 

plus un seul programme de démonstration en 
BASICODE. 


Le BASICODE n’est évidemment pas un pro¬ 
cédé miraculeux : il élimine d’office la couleur, la 
haute résolution graphique, et les effets sonores 
évolués. De fort beaux programmes peuvent 
néanmoins être écrits sans ces facilités : souve¬ 
nons-nous de certains jeux pour ZX 81 en ver¬ 
sion 16 K ! Il est en tout cas vraiment extraordi¬ 
naire de penser que les programmes que l’on 
écrit sur sa machine pourront être rechargés sur 
des ordinateurs radicalement différents, exis¬ 
tants ou à venir et vice versa. 
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LES PLUSSS 


Et nous gardons le plus beau pour la fin : BASI- 
CODE a entièrement été mis au point par des 
amateurs bénévoles : sa diffusion se fait selon 
un principe entièrement NON-COMMERCIAL : 
personne ne prend de bénéfice au passage, ce 
qui permet de vendre les kits à leur seul prix 
coûtant de fabrication et d’envoi. Les copyrights 
apposés le sont uniquement en vue d’éviter que 
l’idée ne soit accaparée par des profiteurs sans 
scrupules : les amateurs sont autorisés à copier 


et à faire circuler les logiciels adaptateurs et 
leurs instructions, à condition de respecter scru¬ 
puleusement les conventions d’écriture, ga¬ 
rantes de la compatibilité internationale du pro¬ 
cédé. 

Q’on se le dise, donc, et longue vie à BASI- 
CODE ! 


Patrick GUEULLE 



Le Super Basic est le langage de programma¬ 
tion du QL, le dernier né de chez Sinclair. L’in¬ 
terpréteur est résident et occupe avec le QDOS, 
64 k environ (!) 


Super ce Basic 

Ce langage est un Basic étendu où les complé¬ 
ments portent notamment sur les procédures et 
fonctions avec variables locales, les boucles, 
tests et aiguillages comme on les rencontre dans 
les langages de type Algol (Pascal - C...), ce qui 
signifie que Super Basic est un langage struc¬ 
turé. 

Mais pour ceux qui hésitent à profiter de cette 
possibilité, par suite d’une bonne pratique du 
Basic « classique », ou bien ceux qui veulent re¬ 
prendre des programmes existants, alors Super 
Basic accepte les instructions courantes, en 
prenant quelques précautions. 

L’une des caractéristiques, qui peut paraître ba¬ 
nale, est la possibilité d'utiliser jusqu’à 255 ca¬ 
ractères pour les noms symboliques (variables, 
procédures, fonctions, labels). Ce point est im¬ 
portant parce qu'il facilite sérieusement l'auto¬ 
documentation du programme. 

Avec certains Basic, il est possible de disposer 
les instructions en faisant apparaître une struc¬ 
turation d'ensemble, mais deux ordres viennent 
tout détruire : Goto et Gosub. Le premier est 
principalement utilisé dans les tests et dans les 
boucles ; ici, Goto n’est plus nécessaire puisque 
les boucles sont constituées par FOR... END 
FOR ou bien REPeat... END REPeat, l’ordre 
EXIT provoque la sortie de la boucle. 


Les tests sont de la forme IF THEN ELSE END IF 
et l’aiguillage : SELect ON... END SELect. De 
même, Gosub est inutile grâce à l’emploi des 
procédures et fonctions qui confèrent un avan¬ 
tage énorme du Super Basic. C’est sans doute 
le point le plus important qui oriente le program¬ 
meur vers un style très efficace. En effet, rien 
n’est plus agréable que d'appeler les fonctions 
et procédures par un nom symbolique et surtout 
de transmettre les arguments. 


Variables iocaies et récursivité 

De plus, les variables locales sont possibles et 
pour les amateurs, la récursivité est un jeu d’en¬ 
fant ! Donc, l’utilisateur du QL dispose d’un lan¬ 
gage structuré interprété (il ne manque plus 
qu’un compilateur Super Basic). 

Une autre particularité du Super Basic est l’en¬ 
semble d’instructions qui permettent de gérer 
les fenêtres et les canaux. Bien sûr, le Super Ba¬ 
sic comporte aussi un jeu de fonctions mathé¬ 
matiques, graphiques... 

Enfin, il existe des opérateurs logiques agissant 
au niveau des chiffres binaires (bit), comme on 
le rencontre en langage C. Le programmeur dis¬ 
pose donc d’une panoplie permettant une 
bonne approche du micro processeur et du sys¬ 
tème : PEEK, POKE (y compris les formes W 
(Word) et L (Long)), CALL pour appeler les sous 
programmes en langagejriachîne, et les opéra¬ 
teurs «&&»,« Il », « », « ». 

Pour bien voir ce qu’est Super Basic quelques 
exemples caractéristiques sont proposés pour 
se mettre l’eau à la bouche. 
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Programme 1 


Programme 3 


10 INK 4 
20 CLB 
30 INPUT n 
40 DIM a <n,n> 

50 FOR i=l TO n 
60 FOR j=l TO n 
70 a(i) (j > =1/(i+j-1> 

80 END FOR j 

90 PRINT i ! ; 

100 END FOR i 
110 PRINT "ok" 


Ce programme effectue le calcul des coeffi¬ 
cients d’une matrice de Hilbert : un très bon test 
de précision pour les programmes d’inversion. 
On remarque ligne 70, l'écriture des indices qui 
rappelle celle du langage C. Super Basic admet 
toutefois l’écriture traditionnelle a (i, j). Ligne 80, 
fin de boucle marquée par END FOR i au lieu de 
N EXT ; là aussi, NEXT est accepté mais par 
souci d'homogénéité, il est préférable d’écrire 
END FOR. Par contre, il est déconseillé d'écrire : 
10 FORi = 1 TO n : GOSUB 100 : END FOR 1 
ou 10 FOR i = 1 TO n : GOSUB 100 : NEXT i 
100 PRINTi: RETURN 

aucune erreur est signalée, le programme ne se 
déroule pas du tout comme on s’y attend : il y a 
alors 2 points importants à souligner : d’une 
part, il existe des « boucles courtes », de la 
forme : 

FOR i = 1 TO n : (instruction) : (instruction) dont 
END FOR (ou NEXT) n’est pas pris en compte et 
d’autre part, l’instruction RETum renvoie à la li¬ 
gne suivante (et non à l’instruction suivante. En 
Super Basic, la forme complète s’écrit sur au 
'moins 2 lignes (1 ligne pour FOR, 1 ligne pour 
END FOR). 


Programme 2 

Ce court logiciel peut montrer comment on éta¬ 
blit un programme récursif : ici, calcul de facto¬ 
rielle n. On remarque, ligne 30, L’appel de la 
fonction fac (x), ligne 50 pour définir la fonction, 
ligne 60, la déclaration de variable locale f, li¬ 
gne 100, l’appel récursif de fac (x), ligne 120, le 
retour de la valeur de la fonction et enfin li¬ 
gne 130 la fin de définition. 


10 CLB 
20 INPUT :•! 

30 PRINT "factorielle de "jx;" = ";fac<x> 
40 STOP 

50 DEFine FuNction fac(n) 

60 LOCal f 

70 IF n=0 THEN 

80 -f = i 

90 EL8E 

100 f =n*-f ac (n-1 ) 

110 END IF 

120 RETurn -f 

130 END DEFine -fac 


5 DIM 2(1) 

10 INPUT "partie rHelle,partie imaginaire ",z(0), 2 (i> 
15 PRINT "module ";mod(z) 

20 PRINT "argument ";arg(z> 

25 STOP 

30 DEFine FuNction mod(x) 

40 RETurn SORT (x (0) (0) +x < 1 > *>t C1 > > 

50 END DEFine mod 
60 DEFine FuNction arg(x> 

70 IF x (0)=0 THEN 
80 IF a ( 1X0 THEN 

90 RETurn -90 

100 ELSE 

110 RETurn 90 

120 END IF 

130 ELSE 

140 phi=180/PI*ATAN(K(1)/«(0)) 

150 IF h (0) >0 THEN 

160 RETurn phi 

170 ELSE 

180 IF h (1X0 THEN 

190 RETurn phi-180 

200 ELSE ^ 

210 RETurn phi+lBW 

220 END IF 

230 . END IF 

240 END IF 

250 END DEFine arg 


Le simple calcul du module et de l’argument 
d’un nombre complexe. On observe la simplicité 
d’appel des fonctions mod (z) et arg (z) où z est 
un tableau. La fonction arg (z) fait appel à plu¬ 
sieurs test imbriqués pour reconnaître les singu¬ 
larités. La programmation est ici bien structurée 
grâce à la forme IF - END IF. 


Programme 4 


10 INK 4:CLS 
20 REF'eat nombres 


30 

REPeat entree 

40 

a$=INKEY$ 

50 

IF a«>" 

" THEN EXIT entree 

60 

END REPeat 

entree 

70 

IF a*=. THEN EXIT nombres 

80 

PRINT a T- ! ! 


90 

IF aT<"0" OR a*>"9" THEN 

100 

PRINT "erreur" 

110 

ELSE 


120 

nb=ai" 


130 

SELect ON 

nb 

140 

ON nb=l 


150 

PRINT 

" un " 

160 

□N nb=2 


170 

PRINT 

"deux" 

180 

ON nb=3 


190 

PRINT 

"trois" 

200 

ON nb=4 


210 

PRINT 

"quatre" 

220 

ON nb=5 


230 

PRINT 

"cinq" 

240 

ON nb=6 


250 

PRINT 

"six " 

260 

ON nb=7 


270 

PRINT 

"sept " 

280 

ON nb=8 


290 

PRINT 

"huit" 

300 

ON nb=9 


310 

PRINT 

"neuf" 

320 

ON nb=0 


330 

PRINT 

"zéro" 

340 

ON nb=REMAINDER 

350 

PRINT 

"erreur" 

360 

END SELect 


370 

END IF 



380 END REPeat nombres 
390 PRINT "termint" 

400 STOP 
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Ce programme pourrait sans doute être écrit 
d’une manière nettement plus efficace, le but ici 
est de montrer l’emploi de l’aiguillage par SE- 
Lect ON. Là aussi, le programme est très struc¬ 
turé : boucles REPeat imbriquées avec sortie sur 
test (ligne 50 et ligne 70). 

L’aiguillage SELect ON se trouve dans une 
branche de test (ELSE). La ligne 340 permet, en 
théorie, de traiter les cas autres ; ici, cette ins¬ 
truction est inutile puisqu’un test de validité est 
fait en ligne 90. On remarque aussi une particu¬ 
larité Super Basic : la conversion alphanuméri¬ 
que, nombre (ligne 120), sans passer par une 
fonction spécifique. 

Voilà une idée du style de programmation, on re¬ 
connaît quelques instructions du Basic courant, 
mais en réalité on est bien loin de l'esprit Basic. 

Quelques rares lacunes 



Il faut l’avouer, le Super Basic n'est pas parfait 
et il manque en particulier la possibilité d'effec¬ 
tuer les calculs en double précision, le déroule¬ 
ment pas à pas (TRACE), la sortie avec « for¬ 
mat »... Mais même les interpréteurs (ou 
compilateurs) sont considérés comme les meil¬ 
leurs comportent aussi des lacunes ; il suffit de 
s’adapter. 

Pour mieux voir les possibilités et particularités, 
il est bon de jeter un coup d’œil sur le jeu des 
instructions et les fonctions disponibles. 

instructions Basic 


CLOSE 

INPUT 

POKE 

CLS 

LET 

PRINT 

DIM 

LIST 

REAK 

FOR 

N EXT 

REM 

GOSUB 

ON GOTO 

RESTORE 

GOTO 

ON GOSUB RETURN 

IFTHEN 

OPEN 

RUN 

INKEYS 

PEEL 

STOP 

et les instructions 

i particulières 


DIMN 


' PEEK-W 

FOR END FOR 


PEEK-L 

IFTEHN ELSE 

END IF 

POKE-W 

KEYROW 


POKE-L 

LOCAL 


PRINT TO 

REPeat 

END REPeal 

: DEFFUNCTION 

PAUSE 


END DEF 

SELect ON 

END SELect 

DEF PROCedure 

EXIT 


END DEF 

Fonctions mathématiques 

ABS 

DIV 

RAD 

ATAN 

INT 

RANDOMISE 

ACOS 

LN 

RND 

ASIN 

LOG 10 

SIN 

ACOT 

MOD 

SORT 

DEG 

PI 

TAN 

Fonctions 



pour les chaînes de caractères 

CHR$ 

FILL$ 

LEN 

CODE 

INSTR 


Fonctions graphiques 


ARC 

ELLIPSE 

LINE-R 

ARC-R 

ELLIPSE-R 

POINT 

CIRCLE 

FILL 

POINT-R 

CIRCLE-R 

LINE 



Gestion des fenêtres 


AT 

INK 

SCROLL 

BLOCK 

MODE 

STRIP 

ÈORDER 

OVER 

UNDER 

CLS 

PAN 

WIDTH 

CSIZE 

PAPER 

WINDOW 

CURSOR 

RECOL 


FLASH 

SCALE 


Horloge 

ADATE 

DATE 

SDATE 

DATES 

DAY 


Fonctions graphiques 

«Tortue» 

MOVE 

TURN 


PÉNUP 

TURN TO 



PENDOWN 

Fonctions générateur de son 

BEEP 

BEEPING 

et enfin, les commandes ou fonctions QDOS : 


BAUD 

LBYTES 

Editeur : 

CALL 

LOAD 

AUTO 

CLEAR 

LRUN 

DUNE 

CLOSE 

MERGE 

EDIT 

CONTINUE 

MRUN 

LIST 

COPY 

NET 

NEW 

COPY-N 

OPEN 

RENUM 

DELETE 

OPEN-IN 


DIR 

OPEN-NEW 


EOF 

RÉSPR 


EXEC 

RETRY 


EXEC-W 

SAVE 


FORMAT 

SBYTES 
SEXEC 



Après un peu de pratique du Super Basic, le Ba¬ 
sic courant paraît rudimentaire. Maintenant, la 
programmation est fortement simplifiée (auto¬ 
documentation, symbolisme, bibliothèque, raffi¬ 
nement successifs...) ; les programmes sont net¬ 
tement plus lisibles et faciles à modifier ou 
compléter. 

Dans l'ensemble, le Super Basic est plutôt ins¬ 
piré du lange C que de Pascal ; 

- il est moins structuré (pas de procédures ou 
fonctions imbriquées) que Pascal. 

- des opérateurs permettent d’agir sur la 
forme A (i) (j). 

- on change facilement le type d’une variable (x 
= « 123 » - x prend alors la valeur 123) mais il 
manque l’accès aux pointeurs (adresse des va¬ 
riables). 

Après la présentation du langage, la question 
qui vient immédiatement à l’esprit est la perfor¬ 
mance (vitesse - encombrement mémoire). 
Quelques essais montrent que les calculs ma¬ 
thématiques (fonctions transcendantes) sont 
très rapides (2 fois plus que l’IBM PC, 4 fois plus 
que ie Macintosh). 

Bien sûr, on ne fait pas de tels calculs continuel¬ 
lement, ma'is il ne faut pas oublier qu’on retrouve 
la trigonométrie dans les graphiques à 3 dimen¬ 
sions, les logarithmes pour les calculs financiers, 
diverses fonctions en CAO, simulation... et pour 
bien connaître un langage, une machine, le seul 
moyen est de faire des essais soi-même. 


Claude Nowakowski 
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Numêrologie 


La numêrologie, c’est cette science occulte (ni trop science, ni trop 
occulte) qui consiste à établir un rapport entre les lettres du nom de 
quelqu’un et les grandes tendances de son caractère. C’est là qu’ORDI- 
5 va recevoir de tous côtés des sacs de lettres d’injures : les positivistes 
vont réagir violemment devant l’obscurantisme du propos, les 
ésotéristes, contre l’aspect simpliste du programme. Et les PTT de faire 
leur beurre... 

C’est vrai qu’il ne s’agit là que d’un embryon de programme, 
éminemment perfectible, et que les connaisseurs en numêrologie ne 
manqueront pas d’améliorer. 



Esoîerï X-81 


Il s’agit de réduire un nom à un chiffre entre 1 et 
9. Pour cela, une valeur est attribuée à chaque 
lettre de l'alphabet, selon le tableau suivant : 


1 

A 

J 

S 


2 3 

B C 
K L 
T U 


4 5 

D E 
M N 
V W 


6 7 

F G 
0 P 
X Y 


8 9 

H I 
Q R 
Z 


Cela revient, si l’on préfère, à prendre le rang 
d'une lettre, en additionnant le chiffre des unités 
et celui des dizaines, selon la méthode bien 
connue de la preuve par 9. La lettre Z, par 


exemple, étant la 26 e lettre de l’alphabet, on ad¬ 
ditionne 2 et 6, et l’on trouve 8, comme sur le 
tableau. 

Soit le nom de CLIVE SINCLAIR. On calcule la 
valeur de chaque lettre et on additionne le tout : 
CLIVE SINCLAIR 
3+3+9+4+5 + 1+9+5+3+3+1+9+9 — 64 
6+4=101+0=1 

Le chiffre de Sir (Tonton) Clive est donc le 1. 

Rien d'étonnant à cela. Tous les manuels de nu- 
mérologie, que vous êtes invités à consulter 
pour compléter le programme, vous diront que 
le 1 est le chiffre des chefs et des gagneurs ! 

On peut aussi appliquer la signification des 
9 chiffres à la date de naissance ; car si le nom 
indique les possibilités que l’on porte en soi, la 
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LO 

LU 

H" 

LO 

g 

Qd 

D 

U 


date de naissance, elle, précise ce que le monde 
extérieur vous permettra de faire avec toutes 
vos possibilités. C’est ce qui s'appelle la ROUTE 
DE VIE. Si vous avez dans un coin de votre 
agenda, à la section anniversaires à souhaiter, la 
date de naissance de ce monsieur, ne manquez 
pas d’en faire bon usage. 


La route de vie est devant vous 


Le BASIC du ZX étant un peu lambin, on peut 
espérer gratter quelques nanosecondes en pla¬ 
çant les sous-programmes en début de liste, 
c’est pourquoi la ligne 10 indique péremptoire¬ 
ment GOTO 6000, alors que la ligne 9050, qui 
suit le SAVE pour un démarrage automatique, 
indique GOTO 1000. 

En effet, histoire de ne pas trop charger la mé¬ 
moire, il a été décidé de profiter de la vertu qu'a 
le ZX-81 de sauvegarder les variables en même 
temps que le programme, pour consrver sous 
forme de variables les instructions et les explica¬ 
tions. 

Si donc, une fois le programme tapé et précau¬ 
tionneusement sauvegardé à plusieurs' reprises 
en cours de route (un plantage inopiné est si vite 
arrivé !), on frappe RUN, on se retrouve en 
6000, pour entrer les données. On commencera 
donc par entrer les instructions (voir le tableau 
joint en annexe), en jouant si l'on veut, de la vi¬ 


déo inversée et du centrage pour faire plus joli, 
puis les explications concernant chaque chiffre 
(on complétera éventuellement les lignes qui 
restent avec des NEWLINE, puis des explica¬ 
tions concernant les routes de vie, et enfin celles 
qui concernent les nombres 11 et 22, qui, s'ils 
interviennent dans les calculs, indiquent une 
personnalité particulièrement clouée. Enfin, le 
programme vous envoie directement en sauve¬ 
garde, lignes 9000 et suivantes. 

Les lecteurs prudents, ou ceux qui sont affligés 
d’un secteur 200 volts particulièrement capri¬ 
cieux, trouveront peut-être utile d’ajouter des 
STOP en 6080, 6195, 6295 et 6375 histoire de 
pouvoir faire des sauvegardes intermédiaires, en 
reprenant par des GOTO appropriés. 

Le programme une fois sauvegardé démarrera 
de lui-même par une belle diagonale façon 
écharpe de maire (lignes 1000 sq.) et, après 
avoir affiché quelques instructions, demande le 
nom à examiner, puis la date de naissance. Si 
vous ne la connaissez pas, répondez par n’im¬ 
porte quel chiffre, et ne tenez pas compte des 
indications sur la route de vie. On remarque 
qu'aucune vérification n’est faite sur la date, pas 
même pour s’assurer que l’année comporte 
quatre chiffres, voilà une amélioration possible. 
Le programme affiche ensuite ses calculs (lignes 
3000 sq.) et passe ensuite aux applications 
(4000 sq.). Il propose enfin l’étude d'un autre 
nom (5000 sq.), de manière à éviter aux étourdis 
de repartir sur un RUN, qui ferait sauter tous les 
messages en mémoire. 



ci 

9 

10 

99 

100 

110 

120 

130 

140 

150 

160 

170 


REM 
REM 
REM 
REM 
REH 
REH 
RE H 
REH 
REM 
GOTO 6000 

REM . .SSP . REDUCT ION 

IF C = ll THEN LET Dl=*l 
IF C=22 THEN l_ET D 2 = 1 
IF F THEN PRINT C; 

IF C<=9 THEN RETUP.N 
LET R = INT iCXlQÏ 
LET B=C-R*10 
LET C = fl+B 

IF F THEN PRINT “a";R;B 


fS NUHEROLOGIE 



(C)1965F.J.BRVflRD 
ET ORD1-S 


1S0 GOTO 100 

139 REH ... CALCULS 

200 LET LX=LEN X$ 

210 LET X=0 

22Q FOR 1=1 TO LX 

230 PRINT CHR$ (CODE X$(13+1283 


240 NEXT I 

250 PRINT 

260 LET L2=Ll+2 

270 LET F =0 

260 FOR 1=1 TO LX 

293 PRINT RT L1,I; X$tl) 

3GS LET C=CODE X$(I)-Xû 

310 IF C<1 OR 0X1 THEN GOTO 35 

0 

320 GOSUB 100 

330 LET X=X+C 

340 PRINT RT L2,I;C 

350 NEXT I 

360 lET C=X 

370 LET I>1=0 

360 LET 02=0 

390 LET F = 1 

409 PRINT 

410 GOSUB 100 
420 RETURN 

S9S REM . NEULINE 

900 PRINT RT 21,16; 

910 PRINT "FRAPPE! ESSlŒIBg. " 

920 XNPUT X$ 

930 RETURN 

299 REM .TITRE 

1600 CLS 

1010 FOR 1=1 TQ £G 

1020 PRINT TRB T; “NUHEROLOGIE'' 


1030 

NEXT I 




1040 

FOR 1=1 TO 100 




1S5S 

NEXT I 




1099 

REM . 

INSTRUCTIONS 

1100 

CLS 




1110 

FOR 1=1 TO U1 




1120 

PRINT 1$(Il 




1130 

NEXT I 




1140 

PRINT 




1999 

REM .... SRISIE 

NOM 

ET 

DATE 

2000 

PRINT "UOTRE NOM T" 



2010 

2020 

2030 

INPUT N $ 

PRINT N$ 

PRINT ,,"UOTRE 

DRTE 

DE 

NRIS 

SRNCE ?" 




204.0 

PRINT "(EXEMPLE 

: 05 

. 11 

. 1970 

2050 

INPUT D$ 




2999 

REM . 


CRLCULS 

3000 

CLS 




3010 

LET Ll=2 




3020 

LET X$=N$ 





3030 LET XO=37 
3040 LET Xl=26 
3050 GOSUB 200 
3060 LET N=C 
3070 LET N1=D1 
30B0 LET N2=D2 
3090 PRINT ,,,," 

le 11 ;N;" 

3100 LET Ll=13 
3110 LETXt=Dt 
3120 LET X0=2B 
3130 LET X1=9 
3140 GOSUB 200 
3150 LET D=C 
3160 PRINT 
IE EST LR D; ". 
3170 GOSUB 900 
3999 REM . 


UOTRE NOMBRE EST 


VOTRE ROUTE DE U 


EXPLICATIONS 


4000 CL5 

4010 PRINT "UOTRE NOMBRE DE PERS 
ONNRLITE : *’ ; N , , , 

4020 FOR 1=1 TO U2 
4030 PRINT E$(N,I) 

■404O NEXT I 
4050 GOSUB 900 
4100 CLS 

4110 PRINT "UOTRE ROUTE DE UIE: 

.* D , , , 

4190 FOR 1=1 TO U3 
4130 PRINT R$CD,Ii 
4140 NEXT I 

4150 IF NOT DI THEN GOTO 4240 
41S0 GOSUB 900 
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4200 CUS 
4210 FOR I 
4-220 PRINT 
4230 NEXT 
4.24-0 IF NO' 
4-250 SOSUB 
4300 CUS 
4310 FOR I 
4-320 PRINT 
4-330 NEXT 
4-999 REM . 
5000 PRINT 
? 

5010 INPUT 
5020 IF CH 
TO 9999 
5030 CUS 
5040 SOTO 
5999 REM . 

. .. 

S0Ï0 UET U 
6020 PRINT 
U IGNES) " 
6030 DIM I 
5040 FOR I 
SSS0 INPUT 
S0S0 PRINT 
SOTO NEXT 
6100 UET U 
6110 DIM E 
6120 FOR U 
6130 CUS 
614-0 PRINT 
@a8";CHR$ C 

6150 FOR I 
6160 INPUT 
6170 PRINT 
61S0 NEXT 
6190 NEXT 


TO U4- 
$ (I) 

D2 THEN GOTO 5000 
00 

TO U5 
$ ( I) 

. ENCORE *? 

, "UN OUTRE NOM (O/N! 


CODE X$="N" THEN GO 


ENTREE DES DONNEES 


f; Ul; ” 


Ul., 32) 

TO Ul 
:$ (i) 

.$ (I) 

9 

9,U2.32) 
. TO 9 


TO U2 
.$ C.J .. I) 
$ (J, I) 


6200 UET U 
6210 DIM R 
6220 FOR U 
6230 CUS 
624-0 PRINT 
SE05®"; CHR$ 
U . ) " 

625© FOR I 
6260 INPUT 
6270 PRINT 
6260 NEXT 
6290 NEXT 
6300 CUS 
6310 UET U 
6320 DIM S 
6330 PRINT 
534-0 FOR I 
6350 INPUT 
6360 PRINT 
6370 NEXT 
64.00 CUS 
64-10 UET U 
64-20 DIM T 
64-30 PRINT 
64-4.0 FOR I 
64-50 INPUT 
64-60 PRINT 
64-70 NEXT 
3999 REM . 
9000 CUS 
9010 PRINT 
EZ Ufi CRSS 
ENT ET "J 
9020 GOSUB 
9030 CUS 
904-0 SRUE 
9050 SOTO 
9999 STOP 


îxr uroæoT ton 
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” . 


^ieiTOIOH|DUaNgMBRpïî 

. .. ... 

> E~ >. FORT ES v -'F.E R'S OHM R ü-lT-ÈSl 


CREAT 
INDEP 
AMBIT 
EN RM 
SONT 
RPR 


lË^Rfc^!C^^^Qf>I^CVU^^MOHSRgiû ,, 5l 


j^a^RtPRE oEMTENJI 
MÊ IBRE::’. 


SQCIRBUES, ECUECTIOU 
DZPUOMRTES, DISPONIB 
IMRGINRTIFS ET SENSI 
IUS RIMENT UE BAUME 
ET U HARMONIE. 


IPERSOM)4RUiIT;ESRySFTRB!£'Ê5l 


IMENTRUX, RRTISTES 
RES, GENEREUX, PRR 
URUUS D ESPRIT PRR 
ONT UE SENS DE Ufi 
AMITIE ET DU BEAU 




^PUie^^ION^DU^TJOWBR^^M 


Ües^^^imem^^e^pouuoSrI 

I ' ET UR . RICHESSE 
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CO 
LU 


CO S:;:;:!*;:! 

o in 

ùL ili 
DIII 
u iii 


•<PL ICflT ION 'DE ' LA ROUTE 1 


(6 L . ) 


3S 


C EST CELLE OU LA CONFIANCE EN 
SOI BALAYE LES OBSTACLES ET OUI 
MENE R LH REUSSITE. 


*R4--;refiT zou- p e pou te 


SK 3 S 5 H 1 

ELLE EST CELLE DE LA PRIX 
ET DU BONHEUR SANS HISTOIRES. 




S3EW 


CRIE OU SUPERFICIELLE. ELLE EST 
SOUVENT BRILLANTE ET JAMAIS 
MONOTONE. 




SERIEUSE ET DISCIPLINEE, 

C.LLE EST CELLE DE LA REUSSITE 
LENTE, MAIS SURE. 

^læi gBSBagSægg^BSBSEBB^B te l. ) 


SM 


CEUX OUI TIENNENT LE COUP 
PEUUENT Y TROUUER LR REUSSITE 
MRIS IL N Y « PRS DE DEMI-MESURE 




RaBOm®EÆfl : ïROUTE'»' : S 


. LR ROUTE S EST'. : CELL 
CÀARErOUHrS cT DcS 


(6 L.l 


SAVOIR Y CHOISIR SR 
DIRECTION ET SES AMIS CRR ELLE 




EST CELLE DU CHANGEMENT. 

sssæœ (s l.) 
m 


C EST CELLE DES SOLITAIRES ET 
DES PERFECTIONNISTES DONT LR 
RICHESSE EST INTERIEURE. 



JgPïsTeRT.io Nv d 


5B«^gaasm^ea te l.j 


ELLE EST DURE ET IMPITOYABLE 
MAIS 51 L ON Y REUSSIT, 

LE SUCCES EST TOTAL. 



te L. J 


ROUTE DE LR FUITE OU ROUTE DU 
SUCCES ARTISTIQUE, ELLE EST 
TOUJOURS FERTILE EN EMOTION5. 


C EST LE NOMBRE DE LA FORCE 
ÇPÜ®!-?' DE LH PUISSANCE 
ALTRUISTE ET DE LA REUSSITE. 


EaeDmgran a g m üEB ^^ 

C EST LA CONJONCTION DE 
L IDEAL ET DU SENS PRATIQUE 
QUI FAIT LES CELEBRITES. 


Dis-mois ton chiffre, 
je te dirai qui tu es 


C’est volontairement que les explications propo¬ 
sées sont réduites à leur plus simple expression. 
Vous pouvez piocher dans les livres disponibles 
sur le sujet pour les étoffer un peu. C’est dans ce 
dessein que le nombre de lignes de chaque série 
de messages a été paramétré : 

VI (ligne 6010) désigne le nombre de lignes 
consacrées aux instructions. 

V2 (ligne 6100) désigne le nombre de lignes 
consacrées à l’explication de chaque nombre de 
personnalité. 

V3 (ligne 6200) désigne le nombre de lignes 
consacrées à l’explication de chaque route de 
vie. 

V4 (ligne 6310) et V5 (ligne 6410) désigne le 
nombre de lignes consacrées respectivement 
aux nombres 11 et 22. 


Si vous souhaitez dépasser pour ces explica¬ 
tions la taille d’une page-écran (et que la mé¬ 
moire le permette !!), vous pouvez faire appel au 
tourne-page des lignes 900 sq. en ajoutant un 


De plus, les ouvrages spécialisés ne manqueront 
pas de vous apprendre qu’on peut comptabili¬ 
ser à part les voyelles et les consonnes, le chif¬ 
fres des voyelles donnant la personnalité pro¬ 
fonde du sujet considéré, alors que celui des 
consonnes correspond à l’image que les autres 
se font de lui. 

Mais il y a mieux ! Vous trouverez aussi des ta¬ 
bles de concordances, vous indiquant comment 
les différents chiffres (et les gens qui les portent) 
s’entendent entre eux. Essayez avec les stars de 
la politique : fou-rire garanti. 

Bref, que vous vouliez rendre un culte secret à 
Pythagore et à Archimède, que vous souhaitiez 
mettre en œuvre vos talents de peaufineur de 
programme, ou que vous désiriez passer une 
bonne soirée entre amis autour d’un écran, voilà 
un programme qui devrait vous faire plaisir. Et 
tant pis pour les grognons ! 


XDXvX;:;:^ François J. BAYARD 
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L e Wafadriwe de 
premier contact 


Le Wafadrive de ROTRONICS, distribué en 
France par Distribution et Services se présente 
comme une alternative au microdrive de Sinclair, 
dans une zone de prix parfaitement équivalente 
(2350 F TTC, approximativement le prix du 
système ZX avec deux drives) 


Un aspect solide 

.-.■.■.v.v.v.v.v.v.v L'ensemble est intégré et cherche à rappeler les 
unités doubles disquettes des ordinateurs de 
bureau : le bloc est bien fini et le design se marie 
assez bien avec le Spectrum. 

L’ensemble est carré et donc facile à ranger ; on 
le transportera toutefois avec moins de facilité 
I e système Sinclair, dont tous les éléments 
tiennent aisément dans un petit attaché case. 

..Les wafers quant à eux sont des cassettes à 

bande sans fin ; ils sont de dimension deux fois 
supérieure aux microcartouches Sinclair. Leur 
capacité est variable : 16k, 64 ou 128k selon les 
besoins. ' Ils possèdent une particularité 
intéressante : un petit clip escamotable protège 
la bande lorsque la cartouche est hors-drive. 

Un logiciel d’exploitation sérieux. 

Le système Rotronics offre quelques originalités 
par rapport à celui du microdrive : 

- d'abord l’indicateur de fichier est plus naturel.; 
il suffit ainsi de faire 

LOAD *« FICHIER » 

pour que le premier drive enregistre le fichier en 
question ; sur le Sinclair la syntaxe est 
sensiblement plus complexe : 

LOAD *« m » ;1 ;« FICHIER » 

- ensuite, la similitude avec la gestion des 
disquettes est plus marquée ; les noms de 
fichiers peuvent ainsi être précédés d’un « a : » 
ou « b ; » qui indique sur quel drive iis sont ; de 
même le formatage signale à l’utilisateur les 
différentes pistes formatées comme sur un 
systèmme professionnel. 

Bien sûr, ces oppositions sont assez peu 
importantes puisque dans les programmations 
avancées, les commandes du microdrive sont 
une fois pour toutes inscrites sur le logiciel ; elles 
ne sont généralement entrées à la main qu'en 
début de travail ; ce n’est donc pas une 
supériorité marquée. 

En revanche, le Rotronics possède une interface 
Centronics dont le système Sinclair est 
dépourvu dans sa version de base. La possibilité 
d'organiser un réseau local simple parait au 
contraire exclue avec le Rotronics. 


otronics 



Sympathique, maïs peut-être trop 
spécifique. 


Le travail avec le Waferdrive s’est révélé 
agréable : il fait un bruit de défilement discret, 
les cartouches s’insèrent avec facilité, etc. Le 
matériel parait d’une fiabilité mécanique au 
moins égale à celle du microdrive Sinclair, qui 
est déjà voisine de l'absolu pour les applications 
courantes. 


Malheureusement, il s’agit d’un système 
réellement plus lent que l’option ZX : à capacité 
égale, le temps moyen d’accès sera trois fois 
plus long, ce qui explique d’ailleurs le choix de 
bandes plus ou moins longues selon les 
applications ; ceci dit, cela passe encore car le 
ZX travaille très vite. 


Une autre limitation gênante tient à la quantité 
d’information disponible en masse ; 256k 
maximum sur deux cartouches contre 700k 
maximum sur huit lecteurs ZX (il est vrai que huit 
drive ZX collés l’un contre l’autre, ce n’est pas 
une mince affaire, rien qu’en termes de 
budget...) 

Le Rotronics a pris un risque : la syntaxe et la 
gestion des entrées sorties sont quelque peu 
différentes ; ainsi nous sommes-nous plantés en 
essayant de charger certains programmes qui 
passaient pourtant parfaitement sur microdrive, 
sans avoir pris le temps, pour ce premier 
contact, de comprendre pourquoi. 

Ces inconvénients seraient sans doute faciles à 
contourner par une analyse approfondie, mais 
ils suggèrent une réflexion : le système ZX n’est 
déjà pas un système standard et sa maitrise 
implique une certaine connaissance des 
procédures d’entrée-sortie. Rotronics aurait dû 
porter la compétition sur le seul plan du hard et 
opter pour une compatibilité totale au niveau 
des cartouches. Le système Spectrum est trop 
spécifique par lui-même (que l’on pense par 
exemple aux difficultés de commercialisation 
des cartouches, à la rareté relative de la 
documentation sur le fonctionnement réel du 
microdrive, etc.) pour . quMI ne soit pas- 
dangereux de multiplier les types de lecteurs et 
de support d’informations. L’utilisateur final ne 
trouve finalement pas son compte à ces 
politiques tous azimuths. 

A. LOUBEYRE 
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JEUX 


5 programmes 


de jeu 


Black Box (ZX81 16K) 

Des combinaisons d'atomes particulières sont 
en suspension dans une boîte noire ; il faut les 
deviner avec des tirs judicieux au laser. Un jeu 
de réflexion difficile de Christian BLATTER, heu¬ 
reusement, en plus des explications présentes 
dans le programme, celui-ci offre plusieurs ni¬ 
veau de difficulté et des aides que l’on peut ap¬ 
peler. 





m 

5 20 I 

ai 


1 

pa 

LE TIR 1 

DEPUIS 5 I 


EST DEVIE 
fl GAUCHE i 

Lpi 

LORSQU.UN 
ATOME 1 


5E TROUVE 8 
SUR LE 1 

mm 

COTE. I 

DROIT ET 1 

I 

UICE ET 1 
UERSfl. | 

= ',rïraaa»aaa i 

m 



CHRISTIfiN BLR 


r B BRND8T 

. TT |® REM COPYRIGHT 
FRST 

GOSUB 4-300 
GOTO 2560 
GOSUB 4-14.0 
LET N —0 

NBE=NB 
NBR=0 
E,= l 


20 
30 
4-0 
50 
60 
70 
30 
90 
100 
110 
120 
130 
14-0 
150 
+ INT 
160 
170 
180 
>R (3) 


LET 
LET 
LET 

REM' 

rem masa'æma^EiBgraBB 

REM 
RRND 

FOR 1=1 TO 5 
LET R(I) = CINT 
(RND *8) +1 
NEXT I 
SLOUt 

IF fl ( IJ < >R (2) THEN IF fl(l)-î 
THEN IF R ( 1) < >A (4-3 THEN IF 


(RNDï8)+1)*10 


R(1J <>R(6) THEN IF fl(2J<>fl(3) T 
HEN IF R (2) < > A (4-) THEN IF fi (2.1 < :• 
R (5) THEN IF n(3J'<>RC4J THEN IF 
R(3) OR(5) THEN IF R(4Jofl(5J TH 
EN GOTO 210 
190 GOTO 110 
200 REM 

2i0 rem 


3310 


220 REM 
230 LET N=N+1 
24-0 IF N > 1 THEN GOSÜB 
250 POKE 164-18,0 
260 FOR 1=1 TO 30 

270 PRINT RT 22,0; _ 

"; RT 22,0;"DEPRRT EN 7 
280 NEXT I 
290 POKE 164-18,2 
300 INPUT F 

310 IF F <1 OR F>32 THEN GOTO 25 

0 

320 POKE 164-18,0 

330 PRINT RT 22,0;"DEPART EN "; 
F;RT N,23;F 
34-0 POKE 164-18,2 

350 LET A=F*(F<9)+(F*10-71J*(F> 
3 RND F<17J+(115-FJ*(F>16 RND F< 


5) + (330 —F*10 J * (F >24-) 
360 GOTO 1E3+F*5 
REM] 

REM 
REM 

LET R=R+10 
LET 1=1 


370 
1000 
•100 1 

1040 

1041 

1042 
iese 
108 1 
1032 
1120 
liai 
1122 
1160 
1151 
2010 
2020 
2030 
2040 
2050 
2060 
2070 


GOTO 2£3 
LET R=fl-1 
LET 1=2 
GOTO 2E3 
LET R=R—10 
LET 1=3 
GOTO SES 
LET fl=fi + l 
LET 1=4 
REM 
REM 
REM 

GOTO 2410 
LET P=0 
FOR K=1 TO NB 

LET P=P+.001*(fl+L(1,I)=A(KJ 


> +.001ï(R+L(S,I) =R(KJ J +5*(R+L (3, 
I) =fl(KJ J +15*(fl+L (4, IJ =fl(KJ J +100* 
(R=fl(KJ J 
2080 NEXT K 

IF P=0 THEN GOTO 2160 
IF P>=100 THEN GOTO 2190 
LET Pfl=P—INT P 
IF PR >0 THEN LET 1 = 1+2 
IF Pfl>0 THEN GOTO 2150 
LET 1 = 1+3*(P=5J +(P = 1SJ +2* (P 


2090 
2100 
2110 
2120 
2130 
2140 
= 20 J 
2150 
2160 
2170 
2180 
2190 
2200 
2210 
222 © 


IF I> 4 THEN LET 1 = 1-4 
GOSUB 2310 
GOTO 1E3 + 40 *I 
REM 

rem ia=isasM55'8>^ga 

REM 

IF NI>2 THEN GOTO 2280 
RRND USR L+USR L+USR L+USR 
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imm 


0 


Wsiëi! ssnrî. 


J UILLET- 


Âdressë 


J*/ Code postal : I I I I ’ l -i Pays ; - •' • '■ '■ •" ’ ■ 

Veuillez m’abonner pour 10 numéros au prix 
æp/ avantageux de 160 F* au lieu de 200 F. Je fais ainsi 
jff /une économie de 40 F sur le prix de vente au numéro, 
j 4yJo joins mon règlement indispensable libellé 
_ #/à l’ordre de LIST. 

gs j : * Belgique : 1330 FB; Suisse: 50 FS; Canada: 30 $ C; autres pays: 210FF. 

ML Par avioh : Afrique francophone : 245 FF; Amérique, autre Afrique, Océanie ^305 FF; 
Wf Asie: 355 FF. . : 

/ Suisse : 19, route du Grand-Mont, CH 1052, Le Mont-sur-Lausanne, versement Caisse 
; d’Epargne et de Crédit, 10-2418 Le Mont CH 1052, compte courant n° 650156-7. 

















































L+USR L+USR L 

2280 PR INT RT N.. 27; "ABS" 

2290 GOTO 210 
2300 REM 
2310 rem 
2320 REM 

2330 XF NI > -1 THEN RETURN ' 

234-0 LET X=URL X$ 

2350 LET Y =URL Y* 

2380 FOR F = 1 TO 10 

2370 PRINT RT X ,Y ; “ “ ; RT X,Y;"j(gr 

2380 NEXT F 
2390 RETURN 
24-00 REM 

2410 rem BBBBB@MSlgl3Bai 

2420 REM 
2430 LET H = 1 

2440 IF R=B(H) THEN GOTO 2490 
2450 LET H=H + 1 

2460 IF H>32 THEN GOTO 2050 

2470 GOTO 2440 

2480 REM __ __ _ 

2500 REM 

2510 PRINT RT N,27;H 

2520 FOR U = 1 TO 50 

2530 NEXT U 

2540 GOTO 210 

2550 REM 

2560 REM MrfHBaa 

2570 REM 

2580 CLS 

2590 SLOU^ _ ^... ; 

2610 PRINT , ..TRB 4; "REGLES 
B U UE U" 

2620 PRINT ,,,," Lfl BOITE NOX 

RE EST UN CARRE DE HUIT SUR HUI 


UN H E- H 


T DANS LEQUEL 
RTOMES." 

2630 PRINT ,," 

BE BEUINER L. 
ATOMES , EN UT 

NS LASER." 

2640 PRINT ,," 
SONT TIRES BE 
ES DE 1 R 32 SO 
5, REFLECHIS OU 
LES ATOMES." 

2650 PRINT , .. " 

NE DEMONS TR: 


SONT CACHES DES 

L.OBJECTIF EST 
L.EMPLACEMENT DES 
UTILISANT DES RAYO 

LES RAYONS OUI 
DES CASES NUMEROTE 
SONT PARFOIS DEUIË 
OU ABSORBES PAR 


2650 PRINT , .. " DESIREZ —UOUS U 

NE DEMONS TRATION T” 

2660 POKE 16418,0 

2670 PRINT AT 22,0;" APPUYEZ SUR 
(Q) UI OU SUR (N) ON."; RT 22,0; "g?; 


2680 POKE 16418,2 

2690 IF IHKEY$="" THEN GOTO 266B 
2700 IF INKEY$=“0" THEN GOTO 239 
0 

2710 IF INKEY$="N" THEN GOTO 274 
0 

2720 IF INKEY $ < > "O" AND INKEY$<> 
"N" THEN GOTO 2660 
2730 REM 
2740 REM 
2750 REM 
2760 CLS 

2770 PRINT AT 1,2;“COMBIEN UOULE 
Z-UOUS D . ATOMES? " ; AT 1. 2: 


2780 PRINT RT 4,8;" 0 POUR 3 ATÜ 
MES"; AT 6,6;" Il POUR 4 ATOMES"; A 
T 8,6," @ POUR 5 ATOMES" 

2790 IF INKEY $ = "” THEN GOTO 2770 
2800 IF INKEY Jï < > "A" AND INKEY$<> 
"B" AND INKEY $ < >"C“ THEN GOTO 27 
70 

2810 LET NB=CQDE INKEY$-35 
2820 PRINT AT 11,2;“QUEL N IUEAU 
DEMANDEZ^OU^^j^^^l, 2; 

aKBPMNT auec trac 

E ET ECLAIRS";AT 16,6;" B SRNS T 
RACE AUEC ECLAIRS"; AT 18,6; " S S 
ANS TRACE NI ECLAIRS" 

2840 IF INKEY * 5 ="" THEN GOTO 2320 
2850 IF INKEY $ < > " D " AND INKEY $ 4 > 
"E” AND INKEY$ < >"F“ THEN GOTO 28 
20 . 

2860 LET NI=CODE INKEY$-4j.0 

2870 GOTO 50 

2880 REM _ 

iiii R§M 

2910 GOSUB 4140 

2920 FOR 1=1 TO LEN D$X2 

2930 LET A=UAL D*(2*1-1 TO 2*1} 

2940 LET X=UAL X* 

2950 LET Y=UAL Y$ 

2960 PRINT RT X, Y,E*:(I) 

2970 GOTO 2980+10*(1=4)+40*(I=10 
)+130*(1=12)+160*(1=201+200*(1=3 
6 ) 

2980 NEXT I 

2990 PRINT BT 3,22; "ATOMES "J A 
T 4,22; "MIS EN "; AT 5,22; "PLAC 
E. "; AT 7,22; "LE ZX LES";AT 3, 
22;"DISPOSE AT 9,22;"AU HASAR 
D 1 ; AT 10,22; "A CHAQUE "; AT 11,22 
;"FOIS. 

3S00 GOSUB 3220 
3010 GOTO 29BT 

3020 RAND USR L+USR L+USR L+USR 
L+USR L+USR L 

3080 PRINT AT 2,22; “ 23 "; A 


T 3,22;“ “; AT 4,22; "LE L 

ASER "; AT 5,22; "PARTI-BE AT S, 
22; "23, EST AT 7,22; "ABSORBE 
";AT 8,22;"PRR ";AT 9,22i f - 

L . ATOME " ; AT 10,22; " PROCHE;, " ; 
AT 11,22;" "; AT 2,27.; "AB 

S" 

3090 GOSUB 3220 
3100 GOTO 2980 

3110 PRINT AT 2,22; " 11 11 A 

T 4,22; "LE LASER, "j AT 5,22ij7 TIRE 
DE RT 6,22; "11, EST '*J AT 7 
22; "REFLECHI " ; AT. .5, 22; TR CAUSE, 
"; AT 9,22; "DE "; AT 10,22; 

"L.ATOME "; AT 11,22; "CONTIGU. " 

3120 GOSUB 3220 
3130 GOTO 2980 

3140 PRINT AT 2,22;" 18 13 " ; A 

T 4,22; "LE LASER,"; AT 5,22;"ITIRE 
DE "; AT 6,22; ”18, EST ”; AT 7, 
22; "REFLECHI, AT 8,22; "AYANT 

AT 9,22;"RENCONTRE";AT 10,22; 
"2 ATOMES ■■; AT 11,22; "DE FRONT," 
3150 IF 1=11 THEN GOTO 2980 
3160 GOSUB 3220 
3170 GOTO 2980 

3180 PRINT AT 2,22;" 5 20 " ; A 

T 4,22; "LE TIR "; AT 5,22; "DEPU 

IS 5 "; AT 6,22; "EST DEUIE";BT 7, 
22; "A GAUCHE ";AT 8,22; "LORSQU-U 
N“; AT 9,22; "ATOME "; AT 10,22; 

"SE TRQUUE"; AT 11,22; "SUR LE 
; AT 12,22; "COTE "; AT 13,22;" 

DROIT ET “; AT 14,22; "UICE ET 
AT 15,22;"UERSA." 

3190 GOSUB 3220 
3200 GOTO 2740 

3210 rem 
3230 REM 

3240 FOR K=1 TO 3 

3250 PRINT AT 18.22 ; "BJBAPPUYEZ" 5 
AT 18,22; " = >gQHS" 

3260 NEXT K 

3270 IF INKEY*="" THEN GOTO 3220 
3280 PRINT AT 18,22," 

3290 RETURN 
3300 REM 
3310 REM 
3320 REM 

3330 IF N<21 THEN GOTO 3410 
3340 POKE 16413,0 
3350 FOR 1=1 TO 30 

3360 PRINT AT 22,0;"UOUS RUEZ EP 
UISE UOS UINGT COUPSVOUS DEVEZ S 
XTUER ";NBE;" ATOME";"S" AND NBE 
>1; •' » " ; AT 23,13;CHR$ tNBE + 1 

56) 

3370 NEXT I 
3380 POKE 16418,2 
3390 LET « =14BE 
3400 GOTO 3570 
3410 POKE 16413,0 

3420 PRINT AT 22,0; "AVEZ-VOUS TR 
QUUp^^Q UEt-QUE CHOSE 22 , 

; AT 22,0; " 

3430 POKE 16413,2 

3440 IR INKEY $=' v " THEî-i GOTO 3410 
3450 IF INKEY* ="N" THEN RETURN 
3460 IR INKEY 5- ="0" THEN GOTO 343 
<3 

3470 GOTO 3410 
3480 POKE 16416,0 

3490 IF NBE >1 THEN PRINT AT 22,0 
;"COMBIEN D.ATOMES SITUEZ-VOUS ? 

(POUR UN MAXIMUM DE ";NBE;" ES 
SAIS.) " 

3500 IF MBE=i THEN PRINT AT 22,-0 
;"IL NE RESTE PLUS OU,UN ESSAI- 

3510 FOR K=1 TO 30 

3520 NEXT K 

3530 POKE 16413,2 

3540 IF NBE =1 THEN LET M=i 

3550 IF NBEïi THEN INPUT M 

3560 IF M>NBE THEN GOTO 3430 

3570 FOR 1=1 TO M 

3530 LET BE =0 

3590 FOR J=i TO 2 

3600 POKE 16413,0 

3610 PRINT AT 22,0;“PREMIERE" B 
MD j=l;"DEUXIEME" AND J=2;" COOR 
DONNEE (ESSAI N.";I,")7 


3620 

3630 

3640 

3650 

3560 

00 

3670 
600 
3680 
) * (B 
AND 
) ) 

3690 

3700 

3710 

3720 

3730 

3740 

0 

3750 


FOR K=1 TO 25 
NEXT K 

POKE 16418,2 
INPUT B 

IF B <1 OR B>32 THEN GOTO 36 

IF LEN STR$ B>2 THEN GOTO 3 

LET B =B*(B > 0 AND B<9) + (25-B 
>16 AND B<25)+10*((B-8)*(B>3 
B <17) +(33—B) *(B >24 AND B<33 

LET BE=BE+B 

NEXT U 

LET C (E) =BE 

IF E=1 THEN GOTO 3820 

FOR U=1 TO E-l 

IF CIE)OC(d) THEN GOTO 331 
POKE 16418,0 
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L.AUEZ 


3760 for k=i to 20 
377 Q print rt 22,0; "uous_ 

.v.v.v.v. r>i=. iq riflWNF " : RT 22, 0; E, 

3760 NEXT K 
3790 POKE 16418,2 
3800 GOTO 3580 
3810 NEXT J 

3820 FOR d = l TO NB _ 

3830 PRINT RT (BE-INT (gE/10)*10 
) *2 + 1, CINT (BEX10))*2+1;"G" AND 
BE=ACd) RND NI = lj "?■' AND NI=2; 
3840 IF BE=A<d) THEN LET NBR=NBR 
+ 1 

3850 NEXT d 
3860 LET E=E+1 
3870 NEXT I 
3880 LET NBE=NBE-M 

3890 IF NBE>0 RND N<21 THEN RETU 
RN 

3900 REM 
3910 REM 
3920 REM 


3930 PRINT RT 0,23; "I 
3940 FOR 1=1 TO 20 
3950 PRINT RT 1,22;" 

3960 NEXT I _ 

3970 FOR 1=1 TO NB 

3980 PRINT RT (Ad) -INT (A(I)/10 
) *101 *2 + 1, (INT CR (I) /10) 1 *2 + 1; “Ig 


3990 NEXT I' 

4000 PRINT RT 4,22;"UOUS RUEZ";R 
T 5,22; "TROl/UE " ; RT 6,22; NBA;" 

ATOME"; "S" RND NBA >1 ; RT 7,22; " 
SUR " ; NB; " . ' f ; RT 9,22; "SOIT 
; RT 10,22; INT (NBA/NBïl00) ; " a / a 
EN";RT 11,22;N—1;" COUP";"S" RND 

N-l>0 ;"." 

4010 POKE 16418,0 

4020 PRINT RT 22,0;"UOULEZ-UOUS 
“ GARDER LE NIUERU 7 S EN CHANGE 
R OU fl ARRETER 7 "; RT 22,0; 'T 


U030 POKE 16418,2 
4040 IF INKEY $ = "" THEN GOTO 4010 
4050 IF INKEY$="1" THEN GOTO 50 
4060 IF INKEY $ = "2" THEN GOTO 274 
0 

4070 IF INKEY4> = "3" THEN GOTO 410 
0 

4090 GOTO 4010 

4100 CLS _ 

4110 PRINT RT 10,8; "@L|3Cia l|OH 

UOUS REME 

RCIE•.." 

4120 STOP 
4130 REM 
4140 REM Hi 
4150 REM 
4160 CLS 




4170 PRINT 


4180 FOR Ü=1 TO 8 

4190 PRINT . . 

4 200 PRINT "■T;CHR*--TlS6+ÜTT ïi l 


__„... r ; CHR * ( 156 + ( INI 

( C25-U) Xl0) 1 1 +CHR$ (156+ C (25—UJ 
INT ( (25—d) Xl0) *10) ) 

4210 NEXT U 
4220 PRINT ' 




•Ï-Msr-T IR,L'E3aT-S3:N 


4230 PRINT RT 0.21: “ 

4240 FOR J=1 TO 20 

4250 PRINT TRB 21; “ |";TAB 31; "i" 
4260 NEXT U 

4270 PRINT TRB 21; " Bga a ea^mBB—a8 “ 
4280 RETURN 
4290 REM 
4300 REM 
4310 REM 
4320 DIM R(5) 

4330 DIM B(32) 

4340 DIM C(5) 

4350 DIM L(4,4) 

4360 LET R$="0010-1009011—10010- 
110090-10010-9—11010-100110-9" 
4370 FOR U=1 TO 4 
4380 FOR K=1 TO 4 

4390 LET LCK,U)=URL fl$C3*(K+Cd-l 
)*4)-2 TO 3*(K+(U-l)*4)) 

4400 NEXT K 
4410 NEXT d 

4420 LET B $ — "0102030405060708192 
93949596979899897969594939291807 
0605040302010” 

4430 FOR J=1 TO 32 

4440 LET B(d)=URL B$C2*d-l TO 2* 
•J) 

4450 NEXT d 
4460 LET L =16514 

4470 LET C $ = "0060230420120640430 
35062117060190194149064005194136 
064201062128134119195136064” 

4480 FOR F=1 TO 25 

4490 POKE 16513+F,UAL CS(3*F-2 T 
O 3 SF ) 

4500 NEXT F 

4510 LET X$="(fl-IWT îfl/10)*10)*2 
+ 1 " 

4520 LET YS = " ( INT (fl,'10) ) *2 + 1” 
4530 LET DS = ‘'2262464882726262626 
2383887776757576777871S2S353S343 

4560RETURN „ 

9000 SRUE "BLACK BC@" 

9010 GOTO 1 


C. BLATTER 


Logique (Speclrum) 

Testez votre logique avec le Spectrum : celui-ci 
attribue trois professions à trois personnes, 
aléatoirement. A vous de retrouver lesquelles en 
lui posant des questions du genre : « Si untel est 
telle chose alors tel autre est cela » ; il répondra 
vrai ou faux ; au bout d’un certain temps vous 
pourrez formuler une déduction. Conversation¬ 
nel simple mais réellement captivant. 


1 REM INITIATION fi LH LOGIQUE 

2 REN ~ >de bu t de Chaque sérié 

3 REM 

4 BORDER 1: PAPER 1: INK 6 

5 CLS 
10 CLEfiR 

20 GO SUB 5000 
30 CLS 

40 let moyenne =0 
100 PRINT fiT 20,0;"Combien de s 
erie desirez-vous faire?" 

110 INPUT sérié 

ni if sérié =0 then go to 110 
120 FOR s=l TO sérié 
150 LET f=0 

175 IF S=1 THEN GO TO 22© 
is© print "pour commencer la no 
uvelle sérié" 

200 PRINT "Tapez <ENTER >" 

210 INPUT K $ 

220 CLS 

230 PRINT fiT 20,0 
100 © reh ->initia 1 isa 1 ion du jeu 


1010 let a $=" .juge tax i goa 1 
1020 LET ri = INT (RND*3) 

1030 LET n*=a$(l+n*4 TO 4+n*4) 
1040 IF n =0 THEN LET a$=a$(5 TO 

1050 IF n=l THEN LET a$=a$il TO 
4)+a$(9 TO > 

1060 IF ri =2 THEN LET a$=a$( TO S 

1070 LET n =INT (RND*2) 

1030 LET j$=a$il+n*4 TO 4+n*4) 
1090 LET r$=a$(1+(NOT n)*4 TO 44 
(NOT ri) *4) 

1100 LET COUpS=0 

2000 REM ->d e bu t de la recherche 
2010 REH 

2020 PRINT " 

2025 LET COUPS =COUpS+1 
2030 INPUT q$ 

2032 IF q$="" THEN GO SUB 4000 

2034 IF q $ = "" THEN PRINT "Posez 
d autres questions": PRINT 

2035 IF q$="" THEN GO TO 2000 


2036 IF NOT ((LEN q$=36) OR (LEN 
q $ = 4 2 ) OR (LEN q$ = 48) ) THEN GO 

TO 2200 

2037 LET q$=q$+" 

2040 IF q$( TO 3)O "Si " THEN GO 
TO 2200 
2050 LET r, =4 
2060 GO SUB 3000 
2065 LET P0=pl 

2070 IF q$(n TO n +6)<>" alors " 
THEN GO TO 220© 

2030 LET r, =ri+7 
20y0 GO SUB 300© 

2100 LET P2=(P0 AND pi) OR (NOT 

2115 PRINT HT 20,l;q$ 

2120 REH 

2130 IF P2 THEN PRINT "PTOPOSiti 

on vrai": print 

2140 IF NOT P2 THEN PRINT "Propo 

si t ion fausse": print 

2145 REM 

2150 GO TO 2000 

2200 REM -> e r r e u r de saisie 


2210 REM 

2220 PRINT FLASH 1;"ERREUR": 
NT 

2230 GO TO 


PRI 


030 

3000 REM -> a n aiy s e 


P r 0 p 0 s i t i o n s 


3010 if q$(n +5 TO n+14)= "n'est p 
as " THEN LET f=l 
3040 LET pis® 

3050 IF q$(n TO n+3)="r«lfti" fiND 
((r$=q$(n+9 TO n + 12) fiND (NOT f) 
i OR <r*=q*(n+i6 TO n +13! fiND f.) 
) THEN LET P 1 = 1 

3053 IF q$(n TO n+3)="jean" fiND 
( ( jî = q$ (n+9 TO ri+12) AND (NOT f) 
) OR Cj$=q$(n+15 TO n+18) fiND f) 
THEN LET P 1 = 1 

3057 IF q$(n TO n+3)="marc" AND 
( (rnS=q$(n+9 Tu ri+12) fiND (NOT f) 
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X 


) OR (m*=q*(n+15 TO n+13) AND f) 
) THEN LET P 1 = 1 

D 3060 IF f THEN LET pl=NQT pl 
3062 IF f THEN LET n=n+6 
. , 3070 LET n=n+13 

LtJ 307S LET f=0 
__ 3030 RETURN 

4000 REM ->entree des solutions 
4010 REH 
4020 REH 

4030 PRINT "Faites VOS propositi 
ons" 

4040 XNPUT 2$ 

4043 IF LEN 2*013 THEN GO SUE 4 
400 

4045 IF LEN Z $ 013 THEN GO TO 40 
40 

4050 REH 
4060 PRINT Z* 

4070 INPUT X* 

4075 IF LEN X *<>13 THEN GO SUB 4 
400 

4080 IF LEN X $ 013 THEN GO TO 40 
70 

4090 REH 
4100 PRINT X* 

4110 INPUT C* 

4115 IF LEN 0*013 THEN GO SUB 4 
400 

4120 IF LEN 0*0 13 THEN GO TO 41 
10 

4130 REM 
4140 PRINT 0* 

4145 REM ->analyse des solutions 


4146 LET rr=0 

4147 LET rm=0 
4143 LET fj =0 

4150 IF Z*(l TO 4)="fef(ii 
(10 TO 13J=r* THEN LET r 
4160 IF X*C1 TO 4)="ferai 
£10 TO 13)=f* THEN LET f 
4170 IF 0 * ( 1 TO 4) =" ferai 
(10 TO 13)=f* THEN LET f 
4130 IF c*('l TO 4) ="jean 
(10 TO 13)=j* THEN LET r 
4190 if x*ci to 4Ja"jean 
(10 TO 13)aj* THEN LET f 
4200 if z*ci to 4)="jean 
(10 TO 13)=j* THEN LET r 
4210 IF z$(1 TO 4)="marc 
(10 TO 13) =(ii * THEN LET 
4220 IF X*C1 TO 4!="»af0 
(10 TO 13)=(ii* THEN LET 
4230 IF 0 * Cl TO 4)="»arc 
(10 TO 13)=»* THEN LET f 
4235 IF CNOT f») OR CNOT 
NOT rf) THEN RETURN 
" ' ' REM 
REH 
REM 

PRINT "UOUS 
solution en" 

4275 REM 

PRINT COUPS 
LET moyenne 
FOR n=l TO 10 
REM 

LET qy=PI 
N EXT n 
N EXT S 

LET moyenne=moyenne 
REM 

PRINT "Uotre rnoyenn 
";Uhl ( CSTR * cmoy e n ne + 

C to 4)) 

4329 REM 

4330 PRINT "Une autre se 
i ou <n>on" 

4340 LET K * = INKEY$ 

4350 IF K*O"0" AND K*<> 
GO T0 4340 

4360 IF K*="0" THEN RUN 
4370 GO TO 9000 
4400 rem -xerreur dans 


4240 

4250 

4263 

4270 


4280 

4290 

4310 

4315 

4316 
4320 

4325 

4326 

4327 
4323 


" AND 2* 
f = l 

" AND X * 

r =1 

" AND C* 

r =1 

" AND C* 

j = l 

" AND X* 
j = l 

" AND Z* 
j = l 

" AND 2* 
m = 1 

AND X* 
lïi = l 

AND C * 
= 1 

f j ) OR 


avez trouve la 


coup i 
sa o y e.n n e 


s ) . " 

+c o u p s 


est de 
000001 ) ) 


■ i e,<o >u 


'n" THEN 


solution 


4410 REM 

4420 PRINT FLASH 1; "ERREUR" 

4430 RETURN 

5000 REM■->presentation du jeu 

5002 CLS 
5005 PRINT 

5010 PRINT " Des irez-vous prend 
re", , connaissance des instruc 
fions? Tapez <o>ui ou <n>on 


5020 LET K*=INKEY* . 

5030 IF k*="" THEN GO TO 5020 
5040 IF k*="n" OR k*="N" THEN RE 
TURN •>>> ii»ki 

5050 IF K*<>"0" AND K*<>"0’ THEN 
GO TO 5020 
5060 CLS 

5070 PRINT " INITIATION A LH 
LOGIQUE" 

5075 PRINT 
5080 PRINT 

5032 PRINT 

5033 PRINT 
5085 PRINT 
5090 PRINT 
5095 PRINT 

5100 PRINT " Ce programme vous 
propose de" 

5105 PRINT 

5110 PRINT " vous exercer a un r 
aisonnement " 

5115 PRINT 

5120 PRINT " logique eleraentai 
r e avec" 

5125 PRINT 

5130 PRINT " l'expression log 
iqu e : " 

5135 PRINT 

5140 PRINT " 'si ... alors . 

5145 PRINT 

5150 PRINT FLASH 1; AT 21,23; " —> 

5152 IF INKEY * < >"" THEN GO TO 51 

go 

5153 IF INKEY*="" THEN GO TO 515 
3 

5154 CLS 
5160 PRINT 
5165 PRINT 

5170 PRINT " Uous devez associe 
r a trois " 

5175 PRINT 

5180 print " personnes, leurs act 
i vites ,en" 

5185 PRINT 

5190 RRINT " proposant des hypot 
heses" 

5195 PRINT 

5200 PRINT " composées comme si- 
dessous:" 

5205 PRINT 
5207 PRINT 

5210 PRINT " 'Si <p roposition 1> 
■alors " 

5215 PRINT 

5220 PRINT " , (proposition 2>' 

5230 PRINT 
5235 PRINT 
5240 PRINT 
inateur" 

5250 PRINT 
5260 PRINT 
ou faux. " 

5270 PRINT FLASH 1;AT 21,28;"--> 

5230 IF INKEY*<>"" THEN GO TO 52 
30 

5290 IF INKEY*="" THEN GO TO 529 
0 

5300 CLS 


aux quelles l'ord 
r e p o n d r a par v rai 


5310 

PRINT 

" Les 

tro 

S sont: •• 



5340 

PRINT 



5350 

PRINT 

" — 

r e (h i 

5360 

PRINT 



5370 

PRINT 

" — 

r» a r c 

5380 

PRINT 



5390 

PRINT 

" — 

jean 

5400 

PRINT 



5410 

PRINT 

" Les 

tro 

ons s 

ont : " 



5420 

PRINT 



,5430 

PRINT 

" - 

juge 

5440 

PRINT 



5450 

PRINT 

" — 

goal 

5460 

PRINT 



5470 

PRINT 

" - 

taxi 

5480 

PRINT 



5490 

PRINT 

Ch â 

que 

une • 




5500 

PRINT 



5510 

PRINT 

" une 

0 c eu 

e r e n t 

P „ " 



5515 

PRINT 

FLRSH 

1; RT 


5517 

17 

IF INKEY*<> 

"" THEN GO TO 55 

551S 

g 

IF INKEY*=" 

" THEN GO TO 551 

5519 

L LS 


5520 

PRINT " uoici quelques exe 

iïiples " 


5530 

PRINT 


5540 

PRINT " d 

'hypothèses : " 

5550 

PRINT 

5560 

PRINT 


5570 

PRINT " -Si 

marc est goal a 

lors 

jean " 

5580 

PRINT 


5590 

PRINT "est 

tax i " 

5600 

PRINT 


5610 

PRINT " -Si 

remi n'est pas 

juge 

a lors" 


5620 

PRINT 


5630 

PRINT "remi 

est goal" 

5640 

PRINT 


5650 

PRINT “ -si 

marc est taxi a 

lo rs 

jean " 


5660 

PRINT 


5670 

PRINT "n'es 

t pas goal" 

5630 

PRINT 


5690 

PRINT " -Si 

marc n'est pas 

taxi 

a lors" 


5700 

PRINT , 

PRINT "jean 


5710 

n'est pas goal" 

5720 

PRINT FLASH 

i;AT 21,28;"--> 

5730 

30 

IF INKEY*<> 

"" THEN GO TO 57 

5740 

0 

5750 

IF INKEY * = ” 

" THEN GO TO 574 

CLS 


5760 

PRINT " 

Quand vous pense 


identifie chaque o 
alors tapez uniqu 
(ENTER>,et entrez 
déduction sous ta 
' marc est g 


z avoir" 

5765 PRINT 
5770 PRINT 
c cupa tion " 

5730 PRINT 
5790 PRINT 
entent " 

5300 PRINT 
5310 PRINT 
VOS" . 

5820 PRINT 
5325 PRINT 
f o rate : " 

5830 PRINT 
5835 PRINT 
oa l ' " 

5840 PRINT 
5345 PRINT 
5350 PRINT 

5860 PRINT " -" 

5370 PRINT 

5880 PRINT " -" 

5890 PRINT 
5900 PRINT " 

5910 PRINT 
5920 PRINT 

5930 PRINT "Tapez une touche pou 
r .commencer" 

5935 IF INKEY*<>"" THEN GO TO 59 
35 

5940 IF INKEY*=“" THEN GO TO 594 
0 

5950 RETURN 

8000 REM ->sauvegarde du jeu 
6001 REM 

6003 SAUE "Logique" LINE 6004 
6005 PRINT AT 10,0; 

6010 PRINT " initiation a la 
logique" 

6020 PRINT 


5035 IF INKEY*="" THEN 60 TO 603 
5 

6040 RUN 

9910 rem * prénoms * 

9920 REM marc --> m* 

9930 REM jean --> j* 

9940 REM remi --> r* 

9950 REM * goûts * 

9960 REM > juge 
9970 REM > goal 
9930 REM > taxi 

9990 REM -> s o r tie du programme 

9999 ERASE "m"; 1;“Logique": SAUE 
*"ra";i;"Logique" 


Philippe MOY 


P.S. Les gens pressés peuvent faire l’économie des règles qui se trouvent aux lignes 5000-5930 
à condition de les étudier auparavant. 
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Mars’ Ranger (Specirum) 


Un jeu complet de Bertrand CLERGEOT ; tout y 
est, l’annonce, les explications pour patienter et 
le mouvement rapide du véhicule martien dans 
un décor étrange. Charger d’abord les codes 
avant de lancer le programme après les avoir 
auparavant sauvegardés par un SAVE CODE 
35000, etc. Cette technique autorise une trans¬ 
cription facile sur microdrive pour des charge¬ 
ments immédiats lorsque vous vous monterez 
avec ce beau périphérique. 



•10 FÜR 1-1=0 TQ 14-3 , „ 

S0 REflD ni: POKE UsR "a"+n,m 

30 NEXT n 

31 GO SUB 1000 

32 FOR n=39200 TO 39327 :REHDi 
1 : POKE ri,ni: NEXT n 

4.0 DATA BXN 00000000 
42 DflTfi BIN 01111111 
44 DATA BIN 01000000 
4ô DATA BIN 01000000 
48 DATA BIN 01000000 
50 DATA BIN 01000000 

52 DATA BIN 11111111 

54 DATA BIN 11111111 

55 REH 

56 DATA BIN 00000003 

53 DATA BIN 11111111 
60 DATA BIN 10300001 
62 DATA BIN 10011101 
64 DATA BIN 10310101 
66 DATA BIN 10011001 
70 DATA BIN 11111111 

72 DATA BIN 11111111 

73 REM 

74 DATA BIN 00000300 

76 DATA BIN 03000300 

77 DATA BIN 00303300 
79 DATA BIN 00300003 
32 DATA BIN 03300000 
84 DATA BIN 00003030 

36 DATA BIN 00000001 

37 DATA BIN 11111111 

38 REM 

90 DATA BIN 11111111 

92 DATA BIN 11111110 
94 DATA BIN 00000010 
96 DATA BIN 01110010 

93 DATA BIN 10301010 
100 DATA BIN 10101011 
102 DATA BIN 13001000 
104 DATA BIN 01110000 
110 REM 

112 DATA BIN 11111111 
114 DATA BIN 00000111 
116 DATA BIN 11110100 
■118 DATA BIN 11110100 
120 DATA BIN 00000101 
122 DATA BIN 11111101 
124 DATA BIN 00030001 
130 DATA BIN 00000000 
132 REM 

134 DATA BIN 11111111 
136 DATA BIN 11111111 
138 DATA BIN 00000111 
140 DATA BIN 11100111 
142 DATA BIN 00010000 
144 DATA BIN 31010000 
146 DATA BIN 00010000 
148 DATA BIN 11100000 
150 REM 

152 DATA BIN 00300000 

154 DATA BIN 10000311 

155 DATA BIN 11000011 

156 DATA BIN 11000111 

153 DATA BIN 11010111 
160 DATA BIN 11110111 
162 DATA BIN 11110111 
164 DATA BIN 11111111 
170 REH 

172 DATA BIN 00011100 
174 DATA BIN 00111110 
176 DATA BIN 01111110 
178 DATA BIN 01111110 
130 DATA BIN 11111110 
182 DATA BIN 11111110 
184 DATA BIN 11111111 
136 DATA BIN 11111111 
190 REM 

192 DATA BIN 03000300 
194 DATA BIN 01111110 
196 DATA BIN 01111110 

193 DATA BIN 01111110 
210 DATA 0,0,0,0 
220 DATA 0 

222 DATA BIN 30010000 
224 DATA BIN 03310000 
226 DATA BIN 00111000 
228 DATA BIN 03111000 
230 DATA BIN 00111000 
232 DATA BIN 00111000 

235 DATA BIN 00111000 

236 DATA 255-6IN 30003001 


233 DATA 25S-BIN 03000011 

243 DATA 255-BIN 00000111 
242 DATA 255-BIN 00001111 

244 DATA 255-BIN 03311111 
246 DATA 255-BIN 00111111 
248 DATA 255-BIN 01111111 
250 DATA 255-BIN 11111111 

252 DATA 255-BIN 10000300 

253 DATA 255-BIN 11000000 

254 DATA 255-BIN 11100000 
256 DATA 255-BIN 11110000 
253 DATA 255-BIN 11111003 
260 DATA 255-BIN 11111100 
262 DATA 255-BIN 11111110 
264 DATA 255-BIN 11111111 

300 DATA 0,3,BIN 01111113,BIN 0 
1111110,0,0,3,0 

310 DflTfi 3,24,24,24,24,24,24,0 

312 DATA BIN 10001001 

314 DATA BIN 01001310 

316 DATA BIN 00113100 

318 DATA BIN 13011110 

320 DATA BIN 01111001 

322 DATA BIN 00101100 

323 DATA BIN 01010010 

324 DATA BIN 10010001 
350 DATA 0 

352 DATA BIN 00001111 
354 DATA BIN 03111111 
356 DATA BIN 11111111 
358 DATA BIN 11111111 
360 DATA BIN 00111111 
362 DATA BIN 00001111 

364 DATA 0 

365 DATA BIN 03111100 
368 DATA 255,255,255,255 
370 DATA BIN 11011011 
372 DATA BIN 11100111 
330 DATA BIN 00111100 
381 DATA 0 

334 DATA BIN 11110300 
386 DATA BIN 11111100 
38S DATA BIN 11111111 
390 DATA BIN 11111111 
392 DATA BIN 11111100 
394 DATA BIN 11110000 
398 DATA 0 

400 DATA 98,98,122,167,193,205, 
167,149,167,149,149,149,205,167, 

167.167.98.98.122.167.190.205.16 

7.149.167.149.122.128.110.122.12 

2,122 

402 DATA 98,98,122,167,190,235, 
167,149,167,149,149,149,205,167, 

167.167.93.93.122.167.190.235.16 

7.149.167.149.122.123.110.122.12 

2,122 

404 DATA 98,98,98,80,98,122,122 
,93,122,149,149,149,149,122,122, 

122,122 

436 DATA 98,98,80,98,122,122,93 
,122,149,122,123,110,122,122,122 
408 DATA 93,96,93,80,93,122,122 
,98,122,149,149,149,149,122,122, 

122,122 

410 DATA 98,98,30,98,122,122,98 
,122,149,122,128,110,122,122,122 
412 LET a $ — "0000010000001000000 
00010000000000022000000100000000 
22000000220000000030000000000300 
00030000000003000000010000000220 
00000002200000000011000000000030 
00003000000030010000032000001000 
00300000200000300000200000100000 
300000 100000-300000200000 10000022 
30000022000000000000110000030000 
00200000300000200000110000003300 
002000000200000" 

414 LET A$ = A£ + "0003040000004000 
00400800038000004000003003084000 
000100000" 

416 LET 5$—"0000011100011111000 
00011011110001111" 

418 FOR n=39503 TO 39500+378: P 
OKE n,CODE as in-39499) -48: NEXT 
N 

420 FOR N=39900 TO 39935: POKE 
N,CODE BS(N-39899)-48: NEXT N 
440 PAPER 1: CLS : PR INT AT 10, 
12; INK 7;"ATTENTION" 

450 PAUSE 200 
452 INK 1: CLS 


560 RANDOMIZE USR 35000 

565 PRINT AT 10,11; INK 7;"GAME 

OUER" 

570 FOR Nsi TO 300: NEXT N 
580 IF XNKEY'$ = " " TMEN GO TO 580 
590 60 TO 440 
800 STOP 

1000 LET a$="CLERGEOT-BERTRAND 1 
933" 

1010 LET BS="© 34 PRESENTE" 

1020 BORDER 1: INK 7: PAPER 1: C 
LS 

1321 PRINT AT 2,3;"LAISSEZ LA CA 
SSETTE TOURNER" 

1022 INK 6: PLOT 5,5: DRAU 245,0 
: DRAW 0,165: DRAU -245,0: DRAW 
0, -165 

1030 INK 7: FOR N=1 TO 27: PRINT 
AT 19, NlINK 5.1" DSL," ; AT 20, N; 
INK 2; " ©Ho®" 

1040 IF N>4 AND N<22 THEN PRINT 
: FOR M=1S TO 12 STEP -1: PRIÿT 
AT M,N+i;" ";AT m-i,n+ 1; INK to;" 
I": NEXT M: PRINT AT ll,N+l;A$lN 
-4): BEEP .1,N ' 

1100 NEXT N _ 

1110 PRINT AT 19,28;" "; AT 20, 

28 : " 

1200 FOR N=1 TO 27: PRINT AT 19, 
n;^ink 5;" 02-";AT 20 ,N; INK 2;” 

1 I 40 IF N>6 AND N<21 THEN PRINT 
: FOR M=1S TO 14 STEP -1: PRINT 
AT M,N + l;" ";at m-1,n +1; ink 6;" 
I": NEXT M; PRINT AT 13,N+1;B$CN 
-6); BEEP .1,N 
1300 NEXT N 

1310 FOR N=10 TO 40 STEP 2: BEEP 
.02,N: NEXT N 
1419 CLS 

1436 GO SUB 3000 

1437 PAPER 0 

"Aux contins 


INK 1: PAPER 
CODE 35000 


■une ville, s 


et des surfa 


*** M 


’, 0 ;"TIR 


1438 PRINT AT 21,0; 
de l'univers," 

1450 PRINT AT 0,0: 

1: LOAD "MARS R ’ GER 
1460 INK 7: PAPER 0 
1490 PRINT AT 21,0; 
ur la pianete meiix 
1500 PAUSE 200 
1510 PRINT AT 21,0; 
ces a explorer. 

1520 PAUSE 200 
1530 PRINT AT 21,0; 

ARS RANGER *** 

1540 PAUSE 200 
1550 CLS 
1560 PRINT AT 
. touche '1'" 

1562 PRINT RT 9,0;"SAUT 
. touche ' 0 '" 

1564 PRINT AT 11,0;"ACCELERER . 
.. touche ' 0 '" 

1566 PRINT AT 13,0.: "FREINER 
. . touche 'A'" 

1570 PRINT AT 21,5;"PRESSEZ UNE 
TOUCHE" 

1530 IF INKEY$ < >"" THEN GO TO 15 
30 

1582 IF INKEY$="" THEN GO TO 158 
2 

1584 CLS 

1590 PRINT AT 4,0J 
bs ta c les en les 
en sautant par 
1592 PRINT AT 8,0; 
ave c deux vies et 
détruisant les 
1594 PRINT AT 12,0; 


’ Evitez les o 
•détruisant ou 
dessus. " 

■ vous partez 
en gagnez en 
soucoupes. " 

" Chaque vie 
score a zéro 
fonction de 


PRINT AT 17 


en moins met le 
.Le score est en 
la vitesse." 

1600 RETURN 

3000 BORDER 0: CLS 

,0; PAPER 0.;" 


3002 PRINT AT 18,0; PAPER 0; 1 

3004 PRINT AT 19,0; PAPER 0;' 

3005 PRINT AT 20,0; PAPER 0; ' 
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X 

ZD 

LU 


3006 PRINT RT 21,0; PAPER 0;" m 

4000 PLOT 0,40: DRRU 80,0: DRRUI 
100,0,-P1/2: DRRU -100,0,-PI/4: 
PLOT 188,40: DRAW 74,0 
4010 PLOT 30,40: DRAW INK 6;20,0 

_p J fg 

4020'INK 6: FOR N=0 TO PI STEP . 
2: PLOT COS N*15+40,SIN N*6+40: 
DRRU COS N*20,SIN N*8: NEXT N 
4030 INK 7; FOR N = 1 TO 75: PLOT 
N+90,37 : DRRU 0,RND*10: NEXT N 
4040 PLOT 60,0: DRRU 42,32: DRRU 
2,-1: DRRU -40,-31: PLOT 195,0: 
DRRU -42,32: DRRU 2,1: DRRU 44, 
-33 

4050 PLOT 100,140: PLOT 103,140: 

DRRU 5,0: PLOT 97,140: DRRU -5, 
0: PLOT 100,137: DRRU 0,-5: PLOT 
100,142: DRRU 0,5 
4060 FOR N=1 TO 100: PLÛT RND*25 
0,80+RND+90 
4070 NEXT N 
4030 RETURN 



35000, 
35007, 
35014, 
35020. 
35027. 
35033. 
35039. 
35045. 
35051. 
35057. 
35063, 
35069. 
35075, 
35081. 
35087, 
35095, 
35102, 
35109. 
35117. 
35124, 
35131, 
35141, 
35149, 
35156, 
35163, 
35171, 
35179, 
35186, 
35193, 
35200, 
35207, 
35215, 
35222, 
35229, 
35237, 
35244, 
35251, 
35259, 
35268, 
35276, 
35283, 
35290, 
35297, 
35304, 
35310, 
35317, 
35324, 
35331, 
35338, 
35345, 
35353, 
35360, 
35368, 
35376, 
35384, 
35392, 
35400, 
35408, 
35415, 
35423, 
35431, 
35438, 
35446, 
35454, 
35462, 
35471, 
35478, 
35485, 
35492, 
35500, 
35509, 
35516, 
35524, 
35531, 
35539, 
35548, 
35555, 
35562, 
35570, 
35577. 
35584. 
35592, 
35599, 
35608. 
35613 
35621 
35828. 
35635, 
35642. 
35649. 
35656. 


205,107,13,205,121,137,6 

64.197.205.153.139.193.5 

194.192.136.205.101.137 

205.161.138.14.17.205.9 

140.205.202.137.205.211 

137.205.228.141.205.153 
139,205,92,138,205,248 
142,205,805,138,205,253 
137,205,213,139,205,243 
139,205,180,140,205,85 
141,205,235,140,205,126 
142,205,175,141,205,146 
138,205,48,143,205,108 
143,205,39,144,195,212 
136,22,0,167,124,6,5,23 
203,18,16,251,133,95,213 
193,120,198,88,71,203,66 
40,4,122,198,7,87,203,74 
40,4,122,193,14,87,122 
198’, 64,87,201,203,127,40 
9,6,0,79,33,219,23,9,24,3 
33,0,111,41,41,41,124,198 

60.103.201.245.205.16.137 
241,197,205,56,137,8,8 
126,0,0,18,20,35,16,248 
193,201,33,0,88,62,13,6 

22.14.32.119.35.13.194 

110.137.5.194.108.137.201 

33.76.154.34.232.153.33 
234,153,54,7 ,-33,220,155 
34,236,153,43,54,1,33,32 

153.34.240.153.62.85.50 

242.153.50.250.153.62.29 
50,0,154,62,0,50,248,153 

50.252.153.50.3.154.50 . 
244,153,33,208,7,34,846 
153,62,1,50,254,153,62,65 
50,2,154,33,0,0,34,6,154 
62,2,50,8,154,201,205,142 
2,123,2é4,33,192,193,201 
58,252,153,254,0,202,226 

137.61.50.252.153.195.211 
141,42,232,153,35,34,232 
153,124,254,155,192,125 

254.199.192.33.76.154.34 

232.153.62.255.50.252.153 
201,42,232,153,126,254,0 
202,27,138,254,1,202,40 
138,254,2,202,53,138,254 

3.202.66.138.254.4.202.79 

138.201.62.123.38.19.46 

31.205.80.137.62.36.2.201 

62.150.38.19.46.31.205.80 
137,62,12,2,201,62,151,38 

18.46.31.205.80.137.62.5 

2.201.62.152.38.19.46.31 

205.80.137.62.34.2.201.62 

153.38.19.46.31.205.80 

137.62.11.2.201.38.19.46 
0,205,103,138,38,20,46,0 
205,16,137,235,197,35,14 

8.229.6.31.126.43.119.35 
35,5,194,114,138,225,17,0 
1,25,13,194,111,138,193,3 

22.31.10.11.2.3.3.21.194 
136,138,201,58,250,153,71 

14.255.13.194.152.138.5 

194.150.138.201.38.19.46 
0,205,16,137,96,105,1,32 
0,30,96,62,36,119,9,119,9 

119.237.66.237.66.35.29 
194,177,138,33,0,88,22,64 
62,45,119,35,21,194,196 
138,201,38,18,46,0,205,16 
137,62,9,2,38,18,46,1,229 

205.16.137.225.10.254.5 

204.238.138.44.125.254.33 
194,219,138,201,62,9,2,11 

10.254.14.202.149.141.62 
151745 229,205,80,137,225 
62,a,2,44,201i42,236,153 

35.124.254.156.202.19.139 
34,236,153,201,33,220,155 

34.236.153.201.58.234.153 

103.46.31.205.16.137.62.9 
2,42,236,153,126,254,0 
202,53,139,254,1,202,81 
139,201,58,234,153,87,43 

126.254.1.122.202.66.139 

61.103.50.234.153.46.31 
62,154,205,80,137,62,13,2 


35664 

35671 

35678 

35685 

35692 

35699 

35707 

35715 

35722 

35729 

35736 

35743 

35750 

35757 

35767 

35774 

35781 

35788 

35796 

35303 

35810 

35817 

35824 

35331 

35337 

35344 

35851 

35858 

35366 

35873 

35881 

35889- 

35897 

35905 

35912 

35920 

35928 

35936 

35945 

35953 

35961 

35969 

35977 

35986 

35994 

36003 

36011 

36018 

36025 

36032 

36039 

36046 

36053 

36060 

36067 

36074 

36081 

36088 

36095 

36102 

36110 

36118 

36126 

36134 

36142 

36150 

36158 

36165 

36172 

36179 

36186 

36193 

36200 

36207 

36214 

36222 

36230 

36237 

36245 

36252 

38259 

36268 

36275 

36282 

36289 

36296 

36303 

36310 

36318 

36326 

36334 


201,58,234,153,87,43,126 
254 !0,122,â02,94,139,60 

50,234,153,103,46,31,62 
155,205,80,137,62,13,2 

201,58,234,153,61,103,46 
31,229,62,0,205,80,137,62 
13,2,225,37,124,254,0,194 
. 116,139,53,234,153,60,103 
, 229 : 62,128 ; 205,80,3.37,225 
, 36,124,254,9,194,138,139 
,201,33,242,153,203,6,216 
, 205,5,139,205,172,139,205 
,26,139,205,109,139,201,33 
,64,64,30,6,229,1,0,1,22,8 
, 213,229,22,31,35,126,43 
, 119,35,21,194,187,139,225 
,9,209,21,194,183,139,225 
,1,32,0,9,29,194,177,139 
,201,42,240,153,126,79,22 
, 10,62,0,211,254,205,239 
, 139,62,16,211,254,205,239 
, 139,21,194,220,139,201,65 
, 16,254,201,42,240,153,35 
, 34,240,153,124,254,153 
, 192,125,254,159,192,33,32 
, 153,34,240,153,201,97,46 
,4,62,144,197,205,80,137 
,62,10,2,193,97,46,5,62 
, 145,197,205,80,137,62,10 
,2,193,97,46,6,62,146,197 
, 205,30,137,62,10,2,193,97 
,38,46,4,62,147,197,205,30 
, 137,62,13,2,193,97,36,48 
,5,62,148,197,205,80,137 
,62,13,2,193,62,149,97,36 
,46,6,205,80,137,62,13,2 
,201,97,46,4,197,62,0,205 
, 80,137,62,9,2,193,97,46,5 
,62,0,197,205,80,137,62,9 
,2,193,97,46,6,62,0,197 
,205,80,137,62,9,2,193,97 
,36,46,4,62,0,197,205,80 
, 137,62,9,2,193,97,36,46,5 
,62,0,197,205,80,137,62,9 
, 2,193,97,36,46,6,62,0,205 
,80,137,62,9,2,201,14,17 
, 205,9,140,14,17,205,89 
, 140,201,58,244,153,254,0 
, 194,211,140,205,142,2,123 
,254,38,192,62,5,50,244 
, 153,14,17,205,39,140,14 
, 16,205,9,140,201,58,244 
, 153,61,50,244,153,254,0 
, 192,205,41,142,14,16,205 
, 89,140,14,17,205,9,140 
,201,58,248,153,254,0,192 
, 205,142,2,123,254,35,192 
,62,1,50,243,153,205,58 
, 141,58,244,153,254,0,194 
,33,141,38,13,46,7,62,156 
, 205,80,137,62,14,2,38,16 
,46,5,62,157,285,80,137,62 
,14,2,201,38,17,46,7,62 
, 156,205,80,137,62,14,2,38 
,15,46,5,62,157,205,80,137 
,62,14,2,201,42,246,153,22 
, 100 ,126,79,62,0,211,254 
, 205,239,139,62,16,211,254 
, 205,239,139,35,21,194,63 
,141,201,33,17,46,31,229 
, 205,16,137,225,10,254,14 
,204,113,141,45,125,254,4 
, 194,89,141,36,124,254,19 
, 194,87,141,205,79,142,201 
,62,9,2,44,125,254,15,202 
, 149,141,3,44,10,254,3,202 
, 149,141,45,229,62,156,205 
, 80,137,62,14,2,225,45,201 
,45,62,158,229,205,80,137 
,62,15,2,205,58,141,225 
, 205,16,137,62 ; 9,2,62,0,50 
, 24S,153,201,205,142,2,123 
,254,37,202,199,141,254,38 
, 192,58,250,153,60,60,254 
, 101,200,50,250,153,201,58 
,250,153,61,61,254,15,200 
,50,250,153,201,33,254,153 
, 203,6,208,38,18,46,31,205 
, 16,137,62,8,2,201,58,244 
, 153,254,0,192,38,18,46,7 
, 205,16,137,10,254,8,202 


36341.29.142.38.19.46.4.229.205 

36349.16.137.225.10.254.36.194 

36356.29.142.44.229.205.16.137 

36363.225.10.254.36.194.29.142 

36370.44.205.16.137.10.254.36 
36377,194,29,142,201,195,126 

36383.143.225.195.126.143.225 

36389.225.195.156.143.38.18.46 
36396,4,229,205,16,137,225,10 
36403,254,8,202,32,142,44,229 

36410.205.16.137.225.10.254.8 

36417.202.32.142.44.205.16.137 

36424.10.254.8.202.32.142.201 

36431.38.9.46.5.229.205.16.137 
36439,225,10,254,14,229,204,104 

36446.142.225.36.124.254.17.194 
36453,33,142,201,62,9,2,37,124 
38461,254,8,202,207,142,62,157 

36468.229.205.80.137.225.62.14 
36475,2,36,201,58,0,154,111,38 
36433,8,245,205,159,142,241,61 
36490,254,0,202,150,142,50,0 

36497.154.205.170.142.201.62.29 
36504,50,0,154,205,170,142,201 

36511.205.16.137.62.9.2.3.2.3.2 
36521,201,58,0,154,111,38,S,229 

36529.62.159.205.80.137.62.14.2 

36537.225.44.229.62.160.205.50 
36544,137,62,14,2,225,44,62,161 

36552.205.80.137.62.14.2.201.38 

36560.8.46.5.229.205.16.137.225 
36568,10,254,14,194,231,142,26 
36575,254,60,202,6,144,202,6 
36582,144,62,153,205,80,137,82 

36539.15.2.197.205.58.141.193 

36596.62.9.2.201.33.3.154.52.38 

36805.20.46.31.205.16.137.62.36 
36613,2,58,3,154,254,27,245,204 

36621.17.143.241.201.55.2.154 
36628,254,91,202,36,142,38,20 

36635.46.31.205.80.137.62.41.2 
36643,62,0,50,3,154,53,2,154,60 

36652.50.2.154.201.38.22.46.14 
36660,237,91,6,154,1,240,216 

36667.205.83.143.1.24.252.205 
36674,83,143,1,156,255,205,83 

36631.143.1.246.255.205.83.143 

36688.1.255.255.62.47.229.213 
36695,225,60,9,56,252,237,66 
36702,235,225,229,213,205,30 

36708.137.209.225.44.62.56.2 
36715,201,58,250,153,79,62,100 
36722,145,79,6,0,42,6,154,9,34 

36731.6.154.201.53.8.154.61.50 

36739.8.154.205.39.144.58.8.154 
36747,254,0,202,148,143,205,161 

36754.143.201.14.16.205.89.140 

36761.205.101.144.225.205.213 
36767,143,201,33,18,46,0,205,16 
36775,137,22,15,62,9,2,33,32,0 
36784,9,62,36,119,3,21,194,170 

36792.143.14.16.205.89.140.205 

36799.101.144.14.17.205.89.140 

36306.205.213.143.14.17.205.9 
36313,140,205,213,143,201,16 
36319,254,201,62,0,50,243,153 

36826.14.10.22.100.30.5.66.205 
36S34,210,143,62,0,211,254,66 

36841.205.210.143.62.16.211.254 

36345.29.194.224.143.21.122.254 
36355,50,194,222,143,13,194,220 
36362,143,33,0,0,34,6,154,201 

36870.197.14.1.42.6.154.229.205 

36378.220.143.225.34.6.154.193 

36335.62.9.2.11.2.3.3.2.62.29 
36395,50,0,154,33,8,154,52,201 

36903.58.8.154.193.48.38.22.46 

36911.30.205.80.137.62.56.2.201 
36919,38,17,46,4,6,2,14,3,62 
36928,158,197,229,213,205,80 

36934.137.209.122.2.225.44.193 
36941,13,194,63,144,36,45,45,45 
36949,5,194,61,144,205,58,141 
36958,14,17,205,39,140,205,58 
36963,141,201,22,74,213,205,55 

36970.144.209.20.122.254.79.194 

36977.103.144.201 


, Bertrand CLERGEOT 
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Campus (ZX81 16K) 


DUC1 

DUCS 

DUC3 

DUC4- 

FIG 

RCTIO 

FIGS 

TEST 

tests 

FIN 

MONT 

DE5C 


Récoltez le maximum de trésors en évitant 
toutes les collisions et dirigez-vous vers la sor¬ 
tie... enfin si vous pouvez, parce que ça va très 
vite ! 


; *******s*******-*•****•¥•*** 

; * CRMPU5 * 

;* (C) F,DELflQUflIZE * 

;*****ï***fiî*ïiï*ï**fî«ï 

LD E/0 
LD R,S 

LD C+22014.), fl 
LD HL,(+16396) 

INC HL 
PUSH HL 
LD BC,+34- 
RDD HL,BC 
LD fl,H 

LD (+22000),fl 
LD (+21999),fl 
LD R ', L 

LD (+22001) ,fl 
LD ( +S2002) ,R 
LD BC,+356 
RDD HL,BC 
LD (HL),+133 
LD fl,H 

LD (+22010),fl 
LD ( +22012) ,R 
LD A,L 

LD (+22011),fl 
LD (+22013),R 
POP HL 


; -CADRE- 

LD B,+30 
LD (HL),+128 
INC HL 
DEC B 

ÜP NZ DUC1 
LD BC,+33 
LD D,+22 
LD (HL),+128 
ADD HL,BC 
DEC D 

JP NZ DUC2 
LD B,+30 
LD (HL),+128 
DEC HL 
DEC B 

JP NZ DUCS 
LD D,+22 
LD BC,+33 
LD (HL),+128 
SBC HL,BC 
DEC D 

JP NZ DUC4- 

;-PERSONNAGE- 

LD HL,(+16396) 

INC HL 

LD BC , +364- ^ 

RDD HL,BC 
LD (HL),+52 

CRLL CIBLE 
CflLL CIBLE 
CRLL CANON 
CRLL CIBLE 
CRLL CIBLE 
CflLL CANON 
CRLL MURS 
JP RCTIO 


POP HL 
POP HL 
POP HL 
JP FIG 


-COMMRNDES- 


LD R, (+164-21) 
CP +24-7 
CRLL Z GRUCH 
CP +239 
JP Z TEST2 
CP +127 
JP Z FIN 
R ET 

LD fl, (+164-22) 
CP +223 
CRLL Z DE5C 
CP +239 
CflLL Z MONT 
CP +24-7 
CRLL Z DROIT 
R ET 


POP HL 
POP HL 
NOP 
R ET 

LD (HL),0 
LD BC,+33 
SBC HL,BC 
LD fl,(HL) 

CP +128 
JP NC FIGS 
CP "X" 

JP Z EXPLO 
CP 6 

CflLL Z PRI5E 
CP " + " 

CRLL Z SORT 
LD (HL),+52 
CflLL COMPT 
RET 

LD (HL),0 
LD BC,+33 
RDD HL,BC 
LD R, (HL) 

CP +128 
JP NC FIGS 
"X" 

Z EXPLO 
6 . 

CRLL Z PRISE 
CP ” + M 


CP 

JP 

CP 


CRLL Z SORT 
LD (HL),+52 
CflLL COMPT 
RET 

DROIT LD (HL),0 
INC HL 
LD fl,(HL) 

CP +128 
JP NC FIGS 
pd "y” 

JP Z EXPLO 
CP 6 

CflLL Z PRISE 
CP ”+ M 
CflLL Z SORT 
LD (HL),+52 
CflLL COMPT 
RET 

GRUCH LD (HL),0 
DEC HL 
LD fl,(HL) 

CP +128 
JP NC FIG2 

JP Z X EXPLO 
CP 6 

CflLL Z PRISE 
CP "+'* 

CflLL Z SORT 
LD (HL),+52 
CflLL COMPT 
RET 

COMPT LD fl,(+22008) 
INC fl 
CP 0 

JP Z COMP1 
LD (+22008),fl 
LD fl,0 
RET 

COMP1 LD fl,(+22007) 
.INC R 

LD (+22007),fl 
LD fl,0 

LD (+22003),fl 
RET 

EXPLO LD D,+128 
LD E,+50 

L5 LD HL,(+16396) 

INC HL 
LD B,+23 
L2 LD C,+31 

L1 LD (HL),D 

INC HL 
DEC C 
JP NZ LI 
INC HL 
INC HL 
DEC B 
JP NZ L2 
LD fl, D 
CP 0 

CRLL Z L3 
CRLL NZ L4- 
DEC E 
JP NZ L5 
LD R,10 
LD (+22015),fl 
JP SORTI 

SORT LD fl, (+22014-) 

CP 0 
RET NZ 
POP HL 
SORTI POP HL 
POP HL 
POP HL 
RET 

L3 LD D,+128 

RET 

L4- LD D,0 

RET 

PRISE LD fl, (+22014.) 
DEC R 

* LD-, (+22014-) ,fl 
RET 

;-ENNEMI- 

CIBLE PUSH HL 

LD fl,(+22000) 

LD H,fl 

LD fl, (+22001) 

LD L,fl 
LD (HL),0 
INC HL 

LD (HL).,+130 
INC HL 

LD (HL),+138 
INC HL 

LD (HL),+131 
DEC HL 
DEC HL 
LD fl, H 

LD (+22000) ,fl 
LD fl,L 

LD (+22001),R 
INC E 
LD fl,E 
CP +6 
JP Z TIR 
CP +12 
JP Z TIR 
CP +17 
JP Z TIR 
CP +24- 
JP Z TIR 
CP +26 
JP Z FCIBL 
CIB1 CRLL TIME 


POP HL 
RET 

TIME LD B, 6 
KK2 LD C,+255 
KK.l DEC C 

JP NZ KK1 
DEC B 
JP NZ KK2 
RET 

FCIBL LD (HL),0 
INC HL 
LD (HL),0 
INC HL 
LD (HL),0 
LD R,(+22002) 
LD (+22001) ,fl 
LD R,(+21999) 
LD (+22000) , R 
LD E,0 
POP HL 
RET 

TIR INC HL 
TIR2 LD BC,+33 
RDD HL,BC 
LD fl, (HL) 

CP +52 
JP Z EXPLO 
CP +128 
JP Z CIB1 
LD (HL),"*" 
PUSH BC 
CflLL TIME 
POP BC 
LD (HL),0 
LD R,H 

LD (+22003) ,fl 
LD fl, L 

LD (+22004-) ,fl 
POP HL 
CflLL TEST 
PUSH HL . 

LD fl,(+22003) 
LD H, fl 

LD fl, (+22004-) 
LD L,fl 
JP TIR2 

;--CANON-- 

CANON PUSH HL 

LD HL,(+16396) 
INC HL 
LD BC,+203 
CRN2 RDD HL,BC 
LD fl, H 

LD (+22005),fl 
LD R,L 

LD (+22006),R 
POP HL 
CflLL TEST 
PUSH HL 
LD fl, (+22005) 

LD H,R 

LD fl, (+22006) 

LD L,R 
LD fl,(HL) 

CP +52 
JP Z EXPLO 
CP +174- 
JP Z CRN1 
LD (HL),"U" 
CflLL TIME 
LD (HL),0 
LD BC,+33 
JP CRN2 
CflNl POP HL 
RET 


; -MURS- 

MURS PU5H HL 

LD BC,+22010 
LD fl,(BC) 

LD H, fl 
INC BC 
LD fl,(BC) 

LD L,fl 
PUSH BC 
LD BC,+33 
SBC HL,BC 
LD R,(HL) 

CP +128 
JP Z FMURS 
LD (HL),+133 
POP BC 
LD R,L 
LD (BC),fl 
DEC BC 
LD fl, H 
LD (BC) ,fl 
INC BC 
INC BC 
LD fl,(BC) 

LD H, fl 
INC BC 
LD fl,(BC) 

LD L,fl 
PUSH BC 
LD BC,+33 
RDD HL,BC 
LD R,(HL) 

CP +128 
JP Z FMURS 
LD (HL),+133 
POP BC 
LD R, L 
LD (BC),R 
DEC BC 
LD fl, H 
LD (BC),fl 
POP HL 
RET 

FMURS POP BC 
POP HL 
RET . ■ 
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REM 

POKE 22007,0 
PGKE 2200S , 0 
POKE 22014., 0 
POKE 22015,0 

LET P$ = ''yW^aEBHKifiW^'' 

LET X=2+LEN fl$ 

FOR B = 1 Tu L'EN fl$ 

FOR A = 1 TO X 

PRINT RT © fl; “ . " ; h$ (X-2) 

NEXT fl. 

LET X=X.-1 
N EXT B 
PRINT 

FOR fl=l TO SB 
PRINT "CAMPUS 

NEXT fl _ 

PRINT PT 5,1; " Bi 1 


170 PRINT 


70 PRINT AT 1,3; 

72 IF INKEYg=““ ' 

73 CL S , _____ 

74 PRINT 


THEN GOTO 7£ 


75 IF INKEY$=“” THEN GOTO 75 
77 IF INKEY$="N" THEN GOTO 160 
73 CL S 

30 PRINT "PLONGE AU COEUR D.UN 
CAMP JONCHE" 

32 PRINT 

34 PRINT "DE MINES (""X"") U O U 
5 DEUEZ" 

36 PRINT 

■33 PRINT "RAMENER LE5 TRESORS 
l “ "a*" “ ) , " 

30 PRINT ■ 

32 PRINT "LS SORTIE,SYMBOLISEE 
PAR DES 

34 PRINT 

36 PRINT "EST DIFFICILE fl flTTE 
INDRE 

37 PRINT 

33 PRINT “PRENEZ GARDE AU UflIS 
SEAU" 

100 PRINT 

102 PRINT "PATROUILLEUR "" |fc " " 
ET AU LASER" 

104 PRINT 

105 NEXT fl 

106 PRINT “LES TOURS GRISES ET 
LEUR CANON" . 

103 PRINT 

110 PRINT "REPRESENTE PAR “"B"" 


6 : DES 


3 : DRO 


■111 PRINT 

112 IF INKEY4=”" THEN GOTO 112 

113 CLS 

114 PRINT "POUR UOUS DIRIGEZ UO 
US DISPOSEZ:" 

116 PRINT 

113 PRINT "7:MONTEE 6:DES 

CENTE" 

120 PRINT 

122 PRINT "5:GAUCHE 3: DRO 

ITE" 

124 PRINT 

126 PRINT "ATTENTION : UN MUR SE 
CONSTRUIT" 

123 PRINT 

130 PRINT "RU FUR ET A MESURE D 
U JEU ..." 

132 PRINT 

140 PRINT "TOUT CHOC CONTRE CE 
DERNIER,LE" 

142 PRINT 

144 PRINT "LASER,OU LES PAROIS 
ENTRAINE LE" 

'146 PRINT 

143 PRINT "RETOUR fl LA POSITION 


INITIALE..." 
150 IF INKEY5 = ’ 
160 CLS 


THEN GOTO 150 


175 INPUT DD 

130 IF DD <1 OR DD>5 THEN GOTO 

U0 

132 LET PP =P.EEK 16336+ PEEK 160 
7*256+1 u 

135 LET TD=0 
130 LET TT =0 
135 LET UIE=5 
137 LET NP =0 
200 CLS 
205 LET N=2*DD 
210 LET S=DD 
215 POKE 16513,5 

220 PRINT AT 3,3; "WÊBS" .• AT 4, 




SI"; AT 4, 
" ; AT 13,0 
“ ; AT 17,0 


230 FOR A=10 TO 12 
240 PRINT AT A,29;"+“ 

245 PRINT AT A,7; "B" 

250 NEXT A 

260 PRINT AT 3,7; "X"; AT 11,7; "X 
"; AT 13,7;"X";AT 21,29; "X" 

265 FOR fl = 1 TO N 

270 PRINT AT INT CRND*23)+2,INT 
(RND*19)+9;"X" 

275 NEXT R 

230 FOR H = 1 TU 3 

232 LET 01aINT CRND*20)+2 

233 LET 02=INT (RND*5)+9 

235 IF PEEK (01*33 + 02) =6' THEN G 
QTQ 232 

237 POKE (PP+Q1*33+G2),6 

2H0 NEXT A 

300 RAND USR 16514 

305 CLS _ 

310 PRINT TRB 5; "ffiHHfflESB" 

315 PRINT AT 4,0;"DEPLACEMENTS 
:";256*PEEK 22007+PEEK 22003 
320 PRINT AT 6,0;"TRESOR CAPTUR 
ES :";S-PEEK 22014 
335 IF PEEK 22015=16 THEN PRINT 
AT 3,0;"A ETE DETRUIT..." 

335 IF PEEK 22315=16 THEN LET U 
ie=u iE-i 

337 IF PEEK 22015 0 16 THEN PRIN 
T AT 3,0;"fl REUSSI fl SORTIR..." 

333 PRINT AT 13,0;"UIES RESTANT 
ES :";UIE 

333 IF INKEY'5 = “ " THEN GOTO 339 

340 IF N >13*DD THEN GOTO 600 

341 LET TD=TD+(256+PEEK 22337+P 
ttK 22033) 

345 LET TT =TT+S-PEEK 22014 
350 LET N=N+4 

355 IF UIE=3 THEN GOTO 730 
360 POKE 22014,0 
365 POKE 22015,0 
37© POKE 22037,0 
, 7 5 P U K E 220U5,0 
330 CLS 

395 LET NP=NP+1 
403 GOTO 22@ 

600 LET N=2*DD 
610 LET 5=5+1 
620 POKE 16519,3 
6.30 GOTO 360 
700 CLS 

713 POKE 22014,0 

711 POKE 22315,0 

712 POKE 22037,0 

713 POKE 22003,0 _ 

720 PRINT TRB 1 ; " E@BjHg3HMgafflg 

5T=Wa NIU : " ; DD 
733 PRINT AT 4,0;"TOTAL TRESORS 
: " TT 

74S PRINT AT 6,0;"TOTAL DEPLACE 
MENTS :";TD 

750 PRINT AT 3,0; "C'OEF . REUSSITE 
: "; TT *NP/TD 

755 PRINT AT 13,0;"STAGES EFFEC 
TUES :";NP 

760 PRINT AT 23.6; " SBBÊÊBSSESÊES 


773 IF INKEY$=““ THEN GOTO 770 
733 IF INKEY$="0" THEN RUN 

F. DELAQUAIZE 
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INTERFACE 


30, rue Condorcet - 75009 PARIS 
Téléphone : (1) 285.12.34 


VOTRE SPECIALISTE SINCLAIR 


POUR ZX 81 ET TIMEX 

- Clavier professionnel 

- Interface disquettes et lecteur 5" 1/4 

- Extensions de mémoire 16,32 et 64 K 

- Carte d'inversion vidéo 

- Carte génératrice de sons 

- Synthétiseur vocal 

- Générateur de caractères graphiques 

- Crayon optique 

- Prolongateur souple de bus 

- Filtre d'enregistrement 

- Interface pour poignée de jeu 

- Carte génératrice 16 couleurs 

- Carte auto répétition 

- Carte 8 entrées analogiques 

- Carte entrées/sorties 

- Programmateur d'Eprom 

- Carte Eprom 

- Beep clavier 

- Carte mère 

- Carte proto. 




clavier Pro Spectrum 950.- F. 


... ET ENFIN LE Q.L. ! 


clavier Pro ZX 81 770.- F. 


POUR ZX SPECTRUM 

- Clavier professionnel 

- Interface disquettes et lecteur 5" 1/4 

- Interface ZX 1 

- Lecteur de micro disquette 

- Micro disquettes pour micro drive en stock 

- Extension de mémoire externe 16/48 K 

- Interface type Kempston pour joystick 

- Interface programmable pour joystick 

- Amplificateur de son réglable 
jusqu'à X 10 

- Synthétiseur vocal 

- Modulateur noir et blanc 

- Interface mixte Centronics/RS 232 

- Interface Péritel 

- Crayon optique 

- Carte 8 entrées analogiques 

- Carte entrée/sortie 

- programmateur d'Eprom 

- Carte Eprom 

- Raccordement pour moniteur 
monochrome 

- Prolongateur souple de bus 


TRES GRAND CHOIX DE LOGICIELS UTILITAIRES ET LUDIQUES (IMPORTATION DIRECTE) 
IMPRIMANTES : SEIKOSHA - EPSON - STAR - MANNESMANN TALLY 
MONITEURS MONOCHROMES ET COULEURS : ZENITH - PHILIPS - TAXAN - BMC 


TELEVISION - LOCATION 

POSTES SECAM AVEC SORTIE PERITEL 
POSTES MULTISTANDARDS PAL SECAM 

COMPATIBLES MICRO - ORDINATEURS 


Agréé 


LOCATEL& 


CATALOGUE GENERAL ET TARIFS : 10.- F. 
(remboursable à la première commande) 


NOM . _. . 
ADRESSE— 


Prénom. 


Code Postal. 


.VILLE. 


A retourner à INTERFACE, 30, rue Condorcet, 75009 Paris. 
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Mais 1985 n° 68 2, 


la REFERENCE EN M I CR 0 ■ I N F 0 R MA T I Q ü 

Belgique : 186 FB - Suisse : 7,5 FS - CanadcÆ.95 $ 

DOSSIER W 

PLUS DE 200 ORDINATEURS 7 

TABLEAUX COMPARATIFS 


PANORAMA 
PRINTEMPS 85 

TOUS LES DERNIERS-NÉS 


LAS VEGAS : 
LE CHOC A' 1 ’ 


HP 150, ALICE 90 


M 2946 - 68 - 23 F 




